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Introduction 


The HP-67 Standard Pac provides an excellent nucleus from which to build 
your program library. The programs address topics common to business, 
science, and engineering as well as providing enjoyable programs such as 
Arithmetic Teacher, Follow Me, and Moon Rocket Lander. 


No knowledge of programming is required to use the programs in Standard Pac. 
However, familiarity with sections one through five of the Owner’s Handbook 
(or previous HP calculator experience) is assumed. If this is your first encounter 
with programmability, be sure to read ‘‘Running a Program’’ on pages tv to x1 
of this manual. This detailed description is designed to help you become more 
familiar with your calculator. It is most effective when you perform all opera- 
tions as they are described. 


For each program the Standard Pac provides a description, user instructions, 
keystrokes for example problems, a prerecorded magnetic card (in the plastic 
card case) and program listings (at the back of this manual). There is also a 
diagnostic program for checking calculator operation, a head cleaning card 
which can be used occasionally to clean the magnetic card read/write head, and 
blank magnetic cards which may be used to record the programs you write. 


Standard Pac differs from optional HP-67/97 application pacs in that it contains 
explanations of important programming techniques. The titles and page num- 
bers of these explanations may be found opposite page 15-03 of this manual. 


We hope you find Standard Pac useful in your daily calculations. 
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RUNNING A PROGRAM 
Loading A Program 


Select the Curve Fitting card, SD-03A, from the card case supplied with this 
application pac. 


Set W/PRGM-RUN switch to RUN. 


Turn the calculator ON. You should see 0.00. 


Gently insert either end of the card (printed side up) in the reader slot as shown 
in figure 1. 





Figure 1. 


When the card is part way in, a motor engages and passes it out the side of the 
calculator. Sometimes the motor engages but does not pull the card in. If this 
happens, push the card a little farther into the machine. Do not impede or force 
the card; let it move freely. 


The display will show ‘‘Error’’ if the card reads improperly. In this case, 
press and reinsert the card. 


Since Curve Fitting is longer than 112 steps, the display now shows ‘‘Crd’’ 
indicating that a second card pass is necessary to load the remaining steps. With 
the writing still visible to you, insert the opposite end of the card (figure 2) and 
pass the card through the card reader again. 





Figure 2. 
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When the motor stops, remove the card from the side of the calculator and insert 
it in the ‘‘window slot’’ of the calculator (see figure 3). 





Figure 3. 


The program has now been stored in the calculator. It will remain stored until 
another program is loaded or the calculator is turned off. 











MAGNETIC CARD 


Instructions On The Magnetic Card 


Look at the card that you just inserted in the window slot of the calculator. The 
mnemonics on the card can help you run the program. The most important 
thing to note is that the mnemonics are associated with the user-definable keys 


€} - @. For instance ‘‘LOG2”’ and ‘‘y x” are associated with the @J key. 


Following is a table of the important types of symbols and conventions used in 
this pac. The table is provided as a reference until you become familiar with the 
symbols on the magnetic cards. 


Symbols And Conventions 


SYMBOL OR INDICATED MEANING 
CONVENTION 


White mnemonic: | White mnemonics are associated with the user- 
X definable key they are above when the card is in- 
A | serted in the calculator’s window slot. In this case 
the value of x could be input by keying it in and 
pressing €Q. 

Gold mnemonics are similar to white mnemonics 
































Gold mnemonic: 












y except that the gold ( key must be pressed before 
X the user-definable key. In this case y could be input 
"BB by pressing {9 @. 
















¢ is the symbol for GRU. In this case 
is used to separate the input variables x and y. To 
input both x and y you would key in x, press 
Gian. key in y and press @§. 

The box around the variable x indicates input by 
pressing . 

Parentheses indicate an option. In this case, x is not 
a required input but could be input in special cases. 


X#y 


*» is the symbol for calculate. This indicates that 
you may calculate x by pressing key GJ. 


This indicates that x, y, and z are calculated by 
pressing EY once. The values would be sequentially 
displayed in x, y, z order. 
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SYMBOL OR 
CONVENTION INDICATED MEANING 


The semi-colons indicate that after x has been cal- 
culated using €§, y and z may be calculated in turn 
by pressing and then again GJ. 

The quote marks indicate that the x value will be 
‘“paused’’ or held in the display for one second. The 
pause will be followed by the display of y. 





The two-way arrow indicates that x may be 
either output or input when the associated user-de- 
finable key is pressed. If numeric keys have been 
pressed between user-definable keys, x is stored. If 
numeric keys have not been pressed, the program 
will calculate x. 


The question mark indicates that this is a mode set- 
ting, while the mnemonic indicates the type of 
mode being set. In this case a pause mode is control- 
led. Mode settings typically have a 1.00 or 0.00 
indicator displayed after they are executed. If 1.00 
is displayed, the mode is on. If 0.00 is displayed, it 
is off. 

The word START is an example of acommand. The 
start function should be performed to begin or start 
a program. It is included when initialization 1s 
necessary. 


This special command indicates that the last value or 
set of values input may be deleted by pressing §§. 
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FORMAT OF USER INSTRUCTIONS 


The completed User Instruction Form—which accompanies each program—is 
your guide to operating the programs in this Pac. 


The form is composed of five labeled columns. Reading from left to right, the 
first column, labeled STEP, gives the instruction step number. 


The INSTRUCTIONS column gives instructions and comments concerning the 
operations to be performed. 


The INPUT-DATA/UNITS column specifies the input data, and the units of 
data if applicable. Data input keys consist of (0} to (g) and decimal point (the 
numeric keys), Gg (enter exponent), and (change sign). 


The KEYS column specifies the keys to be pressed after keying in the corre- 
sponding input data. 

The OUTPUT-DATA/UNITS column specifies intermediate and final outputs 
and their units, where applicable. 


The following illustrates the User Instruction Form for Curve Fitting, SD-03A. 


OUTPUT 
DATA/UNITS 
1.00/0.00 
: 

Xx 






INPUT 


pata/units | KEYS 


INSTRUCTIONS 
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oad side 1 and side 2. 
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ptional: Select pause input 
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elect type of regression: 


for linear fit 





for exponential fit 
for logarithmic fit 


for power fit 
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Input x value”. ENTER? 


5 (Input y value. 
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epeat steps 4 and 5 for all data 
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7 (Compute and output coefficient 
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Optional: Make projections 
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OUTPUT 
DATA/UNITS 


KEYS 
y 


INPUT 
INSTRUCTIONS DATA/UNITS 


P * ptional: Make projections oe 
rom) ased on a known x value. 
For a new case go to step 3. 
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Since you loaded this program in ‘‘Loading A Program’’ on page iv, step | is 
already done and we can move to step 2. (If you turned your calculator off, you 
must reload the program.) 


Step 2 is optional. It is primarily intended for printer control on the HP-97 
printing programmable calculator. On your HP-67 calculator, print commands 
are interpreted as pause commands. That is, the calculator stops and displays 
the X-register value for one second and then continues with program execution. 


In this particular application the print mode provides a permanent record of 
input data on the HP-97 printing calculator. On the HP-67 pocket calculator the 
input values are displayed for review if the print input mode is selected. 


To select this ‘‘print/pause’’ mode, you would press {{) EJ as shown in the 
KEYS column of the User Instruction Form. Go ahead and press {{) £§ now. 
You should see a 1.00 in the display as indicated in the OUTPUT DATA/ 
UNITS column. Successive presses of ({ €§ will cause 0.00 and 1.00 to be 
displayed alternately, indicating that the print/pause mode is off (0.00) or on 
(1.00). Try this, but leave 0.00 displayed (print/pause mode off) before moving 
to step 3. 








In step 3 the type of curve fit is selected. There are four options listed, and you 
must select one. For example, to select exponential curve fit, refer to the KEYS 
column of the same line and press {f (. Do this. The number 1.00 should be 
displayed, as shown in the OUTPUT-DATA/UNITS column. 


The magnetic card gives short mnemonic hints about the four possible modes 
that may be selected. Printed in gold above the (@ key is ‘‘EXP?”’ indicating 
that the exponential mode is set by pressing ({) @. 


To do a curve fit, you must input a number of data pairs (x; and y;). Steps 4, 5 
and 6 give the input instructions. First key in x; as indicated under INPUT- 
DATA/UNITS. Then press to tell the calculator that you have com- 
pleted building the number x. Then key in the value for y; and press J. The 
number of data pairs plus one (i + 1) will appear in the display. Repeat the 
procedure for all data pairs. Try it for this data set: 


Xj 1 3 rs 
Yi | 2.7; 20 | 1100 


The keystrokes you should use are 1 2.7 & 3 20 G7 
1100 @§. If you make a mistake, look at the second note at the bottom 
of the User Instructions. It describes procedures for correcting errors. If the last 
input pair was in error, you could press(J (R¥) & and eliminate it. Don’t do this. 
Instead eliminate the (3,20) pair and replace it with (4,60). The keystrokes are 3 


GSD 20 @ + GG 60 GY. 


Now that you know how the program works, the mnemonics on the magnetic 
card will prompt you on data input and data correction. 


When all data have been keyed into the calculator, the regression coefficients 
can be calculated. Step 7 of the User Instructions says press @ to do this. 


Three values will be displayed in the order listed in the comments column of the 
user instructions. First, the coefficient of determination (r? here equal to 1.00) 
will be displayed. Then the regression coefficients, a (1.02) and b (1.00), will 
be displayed. Go ahead and press @. When execution stops (after all three 
values have been displayed), you may review the values by pressing (& again. 


If you wish to have more time to observe a value during a pause, press 
during the pause. This stops program execution leaving the value displayed. To 
restart the calculator, press again. Try this. Press (@, then stop the 
calculator during the first pause by pressing GYR. Press again to restart 
program execution. Stop the calculator during the second pause and see 1.02. 
Press again to complete the calculation. Note that during an output pause, 
the decimal point flashes. This signifies that program execution has not termi- 
nated and will'resume automatically. 
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Now try a projection. Step 9 instructs you to key in an x value, press @ and 
see a projected Y value. Try an x value of 10. You should see a projected ¥ result 
of 22926.17. You can also estimate an x value ¥ using a known y value. Leave 
the value of 22926.17 in the display and press @. The value 10.00 should be 
displayed again. 


If your answers agree with ours, you are ready to try other programs in Standard 
Pac. If your answers did not agree with ours, try the procedure again. 
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MOVING AVERAGE 


MOVING AVERAGE 


| x>'K’,AVG WDATA- VALUES »AVG 





In a moving average, a specified number of data points are averaged. When 
there is a new piece of input data, the oldest piece of data is discarded to make 
room for the latest input. This replacement scheme makes the moving average 
a valuable tool in following trends. The fewer the number of data points, the 
more trend sensitive the average becomes. With a large number of data points, 
the average behaves more like a regular average, responding slowly to new 
input data. 


This program allows for a moving average span of 1 to 22 units. The number 
of units, n, must be specified before any data input begins by keying it in and 
pressing ({) @§. Then the data is input by keying in each value, x,, and pressing 
GJ in tum. The calculator will display the current input number, k, until at least 
n values have been entered. After the n value (and for all succeeding values), 
the calculator will flash the current input number before halting with the 
moving average, AVG, in the display. 


In many applications moving averages are calculated daily, weekly, monthly, 
or even yearly. In such cases it is necessary to store the register contents on a 
magnetic card for future use. To do this, press €9 for WRITE DATA and insert 
one side of the blank card. If the display says ‘‘Crd’’ after the first card pass, 
insert the other end of tlie card. If the display is unchanged after the first pass, 
all data has been recorded on the first pass and you may proceed to other calcu- 
lations. When the recorded data is required again, insert the data card. If 
‘“Crd’’ appears after the first pass, load the other end of the card. The original 
data has been returned to the storage registers and you are ready to continue 
the moving average at the point you left off. 


The value of the average may be displayed at any time by pressing (. This 
feature allows the average to be calculated before n data points have been input. 
The average is based on the number of inputs or n, whichever is smaller. 


Remarks: 


Attempts to input a value larger than 22.00 or smaller than 1.00 for n will 
result in a flashing display which can be cleared by pressing GB. 


All data storage registers are used. 


Moving averages of 10.00 or more units require two passes of the data card to 
record or store the values. 
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INPUT OUTPUT 
STEP INSTRUCTIONS patajunits | KEYS | pata/units 


Load side 1 and side 2. 
If data from a previous calcu- 


me lation is stored on a magnetic i he 
on 
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fea an 1 95. 

average (1022) 

Optional: Select pause input 

mode 

5 | Input data point and compute | 

[moving average” | 

6 [oowstep stornextnon | 
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9 [Optional spy average at 

faim 

ee For a new case go to step 2. ae 
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= *If you make an error on data 
input, you must start over unless 


you previously recorded data 


ma on a magnetic card. If data was as 
- previously recorded, load the Be 






data card and start with the first 
value input after recording the 


card _—an 
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Example 1: 


A six-period moving average is used to project monthly sales. The first 6 
months of sales are as follows: 


Month | 2 3 4 5 6 
Sales 125.183 | 207 | 222 198 240 


Compute the moving average. Also compute the average after month three. 























Keystrokes: Outputs: 

6° 8 6.00 

125 Gy 1.00 

183 Gy 2.00 

207 €§ 3.00 

D | —» 171.67 (average after 
month three) 

222 FY 4.00 

198 @y 5.00 

240 Gy ‘°6.00°’, 195.83 





Now record the data for example 2. 


B | Crd 
Insert a blank magnetic card in the card reader. 





Now turn the calculator off and assume a month has passed. Turn the calculator 
back on and load both sides of Moving Average. 
Example 2: 


The actual sales for the seventh month totaled 225 units. Compute a new 
moving average with this data. Also, output the values in the average. 


Load the magnetic data card recorded at the end of example 1. 


Keystrokes: Outputs: 
225 gy —_—_—____—____# =7,.00""; 212.50 
a ey 27900 =" (Curent moving 


240.00 *** average values 
198.00 *** in newest to 
222.00 *** oldest order) 
207.00 *** 

183.00 *** 


6.00 
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NOTES 











TABULATOR 


>  TABULATOR D-02A 





DEL »> TOT &>%TOT VAL®%TOT 


This program is designed to be of aid in tabulating applications such as account- 
ing and estimating. It can be used to add single columns containing up to 24 
values (VAL), remember each value, and find the percent of total of each 
value. (The first example problem shows this type of use.) The program can 
also be used to total any number of columns and find row totals, the percent of 
total for each row total, and the grand total for a table of values. The total of 
each column is displayed as soon as the column is completed. 


VAL,> VAL; >... RTL, 
WAlss Wilsan, RTL, 


kW YO + 


RTLo4 


CikL, Clk CTL, GRAND 
TOTAL (GT) 





Column totals (CTL) are output when the column is complete. 


Figure 1 
Equations: 
% of Total, - oe x 100 
Remarks: 


If the last value input was in error, it may be deleted by pressing §. This 
subtracts the value from both column and row totals and resets the indices. 
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Attempts to specify more than 24 or less than 1 for the number of rows will 
result in flashing input which can be cleared by pressing GJ. 


All data storage registers are used. 


INSTRUCTIONS 


INPUT OUTPUT 
patajunits |» KEYS | pata/units 
Load side 1 and side 2. 


—_ 
__ 
a 


If your last data input was in aa 


error execute this step to return 








STEP 





NO 





to prior status: 


o 
_ a 
a 
a 

ma 
maa 
— 
ai 
_ 


ROWS 


ROW % 


For new case go to step 2. 
“Flashing input indicates an 
input less than one or greater 


than 24. Clear with Gm. 
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Example 1: 


The following list of unit sales figures are to be totaled and converted to 
monthly percentages. 





January: 1012 May: 1502 September: 1051 
February: 1235 June: 1073 October: 1244 
March: 895 July: 973 November: 1127 
April: 1123 August: 1250 December: 977 
Keystrokes: Output: 
12, gy 0.00 


1012 GY 1235 GY 895 gy 1123 By ———_ 1123.00 
1502 G§ 1073 €§ 973 GY 1250 & —— _ 1250.00 
1051 Gy 1244 gy 1127 Gy 977 EY ———>_ 1342.00 
D | eS ta (Percents) 
O17 t= 
6.65 *** 
8.34 *** 
{1.16 *** 
1.97 *** 
12a? 
0.29 ee 
7.81 *** 
9.24 *** 
et ds 
1.26.°°" 


LO0.00 


1012.00 *** (row totals) 
1235.00 *** 
895.00 *** 
1123.00 *** 
1502.00 *** 
1073.00 *** 
973.00 *** 
1250.00: *** 
1051.00 *** 
1244.00 *** 
1127.00 ** 
977.00 *** 


13462.00 *** 
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Example 2: 


The following table is to be totaled (both rows and columns). Also, find the 
percent of total sales for each booklet. 


BOOKLET SALES DATA 


BOOK 1 
BOOK 2 
BOOK 3 
BOOK 4 





Keystrokes: Outputs: 


4m gq 0.00 

273 GY 1093 CY 423 CY 11S EY 1907.00 (Jan total) 

284 EY 847 CY 654 gy 255 gy 2040.00 (Feb total) 
303 GY 1222 Gy 683 GY 453 ZY 2661.00 (Mar total) 
244 Ey 1027 CY 540 gy 755 gy 2566.00 (Apr total) 
252 EY 978 CY 570 EY 805 gy 2605.00 (May total) 





























Row totals 
C) % of row totals 
BOOKLET SALES DATA 
‘goinialha | peligdicteeie: 
; TOTALS ,, PERCENTS , 
BOOK 1 | 1356 Tl 41.51% ! 
BOOK 2 1 5167 !'! 43.87% '! 
BOOK 3 | 2870 - 24.37% | 
BOOK 4 | 2386 |, 20.26% 
TOTALS 1907 2040 2661 2566 2605, 11779.00,, 100.00% 





CURVE FITTING 


CURVE FITTING 





xi Myi (+) xi yi (-) >r2,a,b 


This program can be used to fit data to: 


—" 


Straight lines (linear regression); y = a + bx, 
Exponential curves; y = ae* (a > 0), 


Logarithmic curves; y = a + bInx, 


Row! ON 


Power curves; y = ax” (a > 0). 


The type of curve fit must be determined before data input begins. To select 
linear regression, you would press the {) € keys. To select exponential curve 
fit, press &§ @. To select logarithmic curve fit, press [) @. To select power 
curve fit, press {9} (@. Do not attempt to change from one type of fit to another 
after data input has begun because the summation registers are cleared when 
the type of curve fit is selected. Restarting can be accomplished by repeating 
the curve fit selection process. 


Data pairs (x; and yj) are input by keying in x;, pressing GXUEGY, keying in 
y; and pressing the €J key. Any number of data pairs may be input. If, after 
pressing the €§J key, you discover a data pair was incorrect, wait until execution 
stops, press GJ (R¥), then-the J key. This will eliminate the errant data pair. If 
you wish to eliminate any data pair previously input, key it in (x y) and 


press €J. 


After all data pairs have been input, press . This initiates calculation and 
output of the coefficient of determination r’, and the regression coefficients a 
and b. The coefficient of determination indicates the quality of fit achieved by 
the regression. Values of r? close to 1.00 indicate a better fit than values close 
to zero. The regression coefficients a and b define the curve generated, accord- 
ing to the equations at the beginning of this discussion. 


After the regression coefficients have been calculated, projections may be 
made based on the curve fit. Key in a known x value, press ( and see an 
estimated y value, y, or key in a known y value, press QJ and see an estimated 
Xx value, x. 


a a a ee ee ee ee ee ee ee ee ee, ee, ee ee i, ee, ee | 


ai 
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Linear Regression 





b = 


Sx, In y, — (3x,)(S In y,) 


Sx? -— (3x, 
nN 
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E In y; — | yy, > In | 
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E (3x)? | Sie it~ (E In y,)? 
n n 


Logarithmic Curve Fit 


r= 












dy; In x os >In x; Ly; 
b= eee, een 
(In x,)? — oa (> In xy)? 


a= (3y) —b >In x;) 


E In Xj -— in Xj Lyi | 
r= 


x) - (& In x;)? | | Ly? — Loss| 
n 


a a a ee oe oe oe ee ee ee ee ee ee ee ee 
> #€=6% 
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Power Curve Fit 





(X In x,)(% In y;) 
n 


_ (2 1n x)? 
n 


(In x;)(In yi) — 


din x)? 


=e] In yi _ 4 “ms | 
n 





; | Xin x,;)(n yi) -Gnucny | ° 
Ee yp - inn? | | Sin «38 > (Z In y,)? 
n n 
Remarks: 


Negative and zero values of x; will cause a machine error for logarithmic curve 
fits. Negative and zero values of y, will cause a machine error for exponential 
curve fits. For power curve fits both x; and y; must be positive, non-zero values. 


Registers Ro—Rg are available for user storage. 


It is not necessary to key in the x value if it corresponds to the counter returned 
to the display (see example 1). 


As the differences between x and/or y values become small, the accuracy of the 
regression coefficients will decrease. 
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INPUT 


eee DATA/UNITS 


INSTRUCTIONS KEYS 


OUTPUT 
DATA/UNITS 


1.00/0.00 


2 | fab 
x 
y 






= 


oad side 1 and side 2. 


iN) 
O 


ptional: Select pause input 


3 





Select type of regression: 
for linear fit 
for exponential fit 
for logarithmic fit 


for power fit 


aN 
x< 


Input x value”. 


on 


Input y value. 


< 


GQ) 8 8/6 oo 
Og a > | 


Repeat steps 4 and 5 for all data 
pairs*™. 
Compute and output coefficient 


of determination r? and a and b. 


Optional: Make projections 
based on a known y value. 
Optional: Make projections 


based on a known x value. 


— 


O | For a new case go to step 3. 


“Note that this step may be skip- 


ed if the x value equals the dis- 


ne) 


layed counter (i + 1). 


xe) 


**The last set of data pairs may 
be deleted by pressing @ &B 
then €. Any set of data pairs may 


a be deleted by entering them as in 
steps 4 and 5 and pressing €. 











ee 







f | 


TR 


i 








— ——— 






_— 


> 


| 
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Example 1: 

Below is the sales data for the first 6 months of a product’s life. According 
to a linear projection, what should the sales be after 12 months? When would 
sales reach the 150 unit per month mark assuming constant linear growth. 


Month | 1 2 3 4 5 6 
Sales 15 | 37 52 59. 83 92 


200 


Sales projection = 185.05 


175 
150 
125 
100 

75 
Time 


50 projection = 


9.69 
25 














Keystrokes: Outputs: 

mB 1.00 

15 37 520) 59 8 8306 928 — 7.00 

0.98 *** — (1?) 
3.35 °° (9) 


15,14 *** (b) 
185.05 units 
9.69 months 





2g 
0g 





Example 2: 


The velocity of a particle experiencing constant acceleration is expressed by 
V=vytat 


where v is the velocity, Vo is the initial velocity, a is the acceleration and t is the 
time since V = Vo. 


3 ’ 1 } : i Pf 
 o = =) = = za Lz _-_ LA LAL = = = = = = iAL -_ =. = © = =. = La = = mJ = = iz LAS _—- 
© 








° 
° 
° 
“4 


The following time velocity data was experimentally obtained for a particle: 


“t(e0c) | Wimisec) 
140 


149 
159 
175 






7 7 






ON OO 





What was the velocity at t = 0? What will the velocity be when t = 20? 


Note that the equation for velocity 
Vv=vy,tat 


is the equation of a straight line and is analogous to 








y =a + bx 


Therefore use linear regression with v substituted for y, vy for a, @ (accelera- 
tion) for b and t for x. 


Keystrokes: Outputs: 


"86 - 1.00 

5 140 03 6 GED 149 0 

7 159 gy 4.00 

9 175 @ +» 1.00 *** (r”) 

96.54 *** (a, v,) 

a1) 0°" (b, acceleration) 
271.97 (m/sec) 
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Example 3: 


Many compression processes can be correlated using the power curve 


p =av? 


where b is the polytropic constant of the process. 


Pressure-volume data for a compression process is shown below. Run a power 
curve fit to determine the polytropic constant, —b. What is the pressure when 
v is 15? 


i 











sj 
— 
— 
—j 
_ 
“j 
3 
4 
4 
a 
_ 
= 
_ 
_ 
4 
4 
| 
4 
4 
a 
ball 
— 
4 


_ 
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Keystrokes: Outputs: 
ae 1.00 

10 GXaEEE) 210 €9 30 GUEED 40 a 

50 12 Q 4.00. 


70 9 90 6.830 — 0.99***  (P) 
8599.81 *** (a) 


-1.62 *** — (-b) 
108.35 





bB 
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CALENDAR FUNCTIONS 


~ CALENDAR FUNCTIONS 
(DT-mm.ddyyyy; SUNDAY = 0) 





<<? DT; <<? DT2 <>ADYS <>AWKS.DYS DT»DOW 


For the period March 1, 1900 through February 28, 2100, this program inter- 
changeably solves for dates and days. Given two dates, the number of days 
between them can be calculated. Given one date and a specified number of 
days, a second date can be found. The program will also work in terms of 
weeks between dates or compute the day of the week given the date. After 
input of a date, its Julian Day number* is displayed. 


A date must be input in mm.ddyyyy format. For instance, June 3, 1975 is 
keyed in as 6.031975. It is important that the zero between the decimal point 
and the day of the month be included when the day of the month is less than 10. 
Weeks are input and output as WKS.DYS. Seven weeks, three days would be 
7.3. The day of the week is represented by the digits 0 through 6 where zero 
is Sunday. 


Equations: 


To compute the day number from the date: 
Julian Day number = INT (365.25 y’) + INT (30.6001 m’) +d + 1,720,982 


= 


where year — | ifm = 1 or2 
year ifm > 2 


on ifm =1or2 
m — 


month +1 ifm >2 
Then days between dates is found by 
Days = Day number, — Day number, 


To compute the date from a day number: 
Day # = Julian Day Number - 1,720,982 


' INT Day # — 122.1 
y 365.25 


*The Julian Day number is an astronomical convention representing the number of days since 
January 1, 4713 B.C. 





. 
—A—————eEEEEE=-_"— 





Me fh ¢« 








“nm mMUMUMRBEDRHRTRRmewmnnanwenananeeae 





‘7- «ee wea ee 2s «. te wae eae we we wwe =oewiwnHeeg#»h»nefeeteteenwewn. ww =zZtlUuelhUOUm!hTOCU 
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| Day # — INT(365.25 y’) 
SNe |e 
" | 30.6001 


Day of the month = Day # — INT [365.25 y’| 
— INT [30.6001 m’ | 


m’—13if m’ = 14 or 15 
Month = m = ee 
m’ — 1 if m’ < 14 


y’ ifm >2 
Year = 
y'+1 ifm =lor2 


To compute the day of the week: 
Day of the week = 7 X FRAC [(Day # +5)/7| 


Remarks: 

No checking is done to determine if input data represents valid dates. 

In this program the calculator uses flag 3 to decide what to do after GJ, G. 
or @} is pressed. If the numeric keys have been pressed, flag 3 is on. This 
causes the value in the display to be stored as an input when the user-definable 
key is pressed. If no numeric keys have been touched, the program will 
calculate the value associated with the user-definable key. Thus, it is important 
not to touch the numeric keys between the last input and the attempt to calculate 
a result. 


Registers Ro-Re, Rp, Rp, Re and Rgo—Rsg are available for user storage. 


INPUT OUTPUT 
STEP INSTRUCTIONS patajunits KEYS pata/uNITS 


Load side 1 and side 2. 


For day of the week calculations 


a 
ne 
Po go to step 6. en 
| nput two of the following: ee 


















First date (mm.ddyyyy) 


7 or weeks between dates” WKS. DYS oo 
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INPUT OUTPUT 
INSTRUCTIONS pataunits | KEYS patasuNits 


Calculate one of the following: ae 







STEP 





& 


— 

“Fisidte | 

“seuddte ? 

Tr a 

Weeks bowen ts | 

Faaeecmsnioneee | 
anal 
en 


¢ j Days 
WKS. DYS 


Input date and calculate day 
of the week (0 = Sunday, 


6 = Saturday) 
For a new case go to step 2. ae 
“Either days between dates or ee 
weeks between dates, but not ae 


both, may be input in step 3. 








Example 1: 


Senior Lieutenant Yuri Gagarin flew Vostok I into space on April 12, 1961. 
On July 21, 1969 Neil Armstrong set foot on the moon. How many days had 
passed between the first manned space flight and the moon landing? How many 
weeks and days? On what day of the week did each event take place? 











Keystrokes: Outputs: 

4.121961 GY 7.211969 g a0). (days) 

| D | 431.5 (weeks.days) 
4.121961 @ 3. (Wednesday) 
7.211969 @ 1. (Monday) 












Ss 2 


: [_ 





7 T TW 


ronTnwTwwTwTewaemweenewan FT 





i 


a i a rr er ES a EE = Or > re = oc cee - a - ce. oo = ee pe ee ee _- eee fc - Sc Pe iP Sr Pe ee FF SES PP... = VF E___”——-—-:LTLTLT 
‘ é ' t 


= = =. ia a = 


= = 


’ 
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Example 2; 


A short term note is due in 200 days. If the issue date is June 11, 1976, what is 
the maturity date?* 


Keystrokes: Outputs: 


6.111976 Ey 200 'B 12.281976 (December 28, 
1976) 





*Some securities use a 30/360 day calendar while this program performs all calculations using 
the actual number of days. Do not use the program for financial purposes unless you are sure 
that actual calendar days are correct. 
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ANNUITIES AND COMPOUND AMOUNTS 


ANNUITIES AND 
COMPOUND AMOUNTS 


>(h] >i) > (PMT | »>(Pv)- » (EVAL) | 





This program can be used to solve a variety of problems involving money, 
time and interest. The following variables can be inputs or outputs: 


=n, which is the number of compounding periods. (For a 30 year loan 
with monthly payments, n = 12 X 30 = 360.) 


= i, which is the periodic interest rate expressed as a percent. (For other 
than annual compounding, divide the annual percentage rate by the number 
of compounding periods in a year; 1.e. 8% annual interest compounded 
monthly equals 8/12 or 0.667%.) 


» PMT, which is the periodic payment. 
= PV, which is the present value of the cash flows or compound amounts. 


= FV, which is the future value of a compounded amount or a series of 
cash flows. 


= BAL, which is the balloon or remaining balance at the end of a series 
of payments. 


The program accommodates payments which are made at the end of com- 
pounding periods or at the beginning. Payments made at the end of compound- 
ing periods (ordinary annuity) are common in direct reduction loans and 
mortgages while payments at the beginning of compounding periods (annuity 
due) are common in leasing. When the program is loaded into the calculator 
or when the START function {J €§ is executed, the calculator is set in ordinary 
annuity mode. Pressing ({) sets the calculator in annuity due mode and dis- 
plays 1.00 indicating that the annuity due mode is set. Pressing © 6 again 
returns the machine to ordinary annuity mode and displays 0.00. Successive 
use of {9} ( will alternately display 1.00 and 0.00 indicating that the annuity 
due mode is on or off, respectively. 


In this program €¥ is used to input n, €} to input 1, to 
input PMT, () to input PV and to input FV or BAL. After all 
inputs are stored it is possible to calculate the unknown value by pressing the 


appropriate user-definable key. For instance, you would press §J to calculate 
interest. 


The START function (9 €§) performs two functions: 
1. It sets PMT, PV, and BAL to zero (n and 1 are not affected). 


2. It sets the ordinary annuity mode. 


2 8 @ 














A 


= 
= 
= 
=i 
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START provides a safe, convenient, easy to remember method of preparing 
the calculator for a new problem. It is not necessary to use START between 
problems containing the same combination of variables. For instance, any 
number of n, i, PMT, FV problems involving different numbers and/or 
different combinations of knowns could be done in succession without using 
START. Only the values which change from problem to problem would have 
to be keyed in. To change the combination of variables without using START, 
simply input zero for any variable which is no longer applicable. To go from 
n, i, PMT, PV problems to n, i, PV, FV problems, a zero would be stored 
(O () in place of PMT. Table 1 summarizes these procedures. START 
should always be used immediately after loading Annuities and Compound 
Amounts. 


Table I 
Possible Solutions Using Annuities and Compound Amounts 


Applications 


Annuity Due 





















Allowable 
Combination of 
Variables 


n, i, PMT, PV (Input 
any three and calculate 
the fourth.) 


Initial Procedure 







Ordinary Annuity 














Use START or set 
BAL to zero. 


Direct reduction 
loan 

Discounted notes 
Mortgages 


















Leases with 
residual values 


Direct reduction 
loan with balloon 
Discounted notes 
with balloon 


n, i, PMT, PV, BAL 
(Input any four and 
calculate the fifth.) 



















Use START or set 
PV to zero. 


n, i, PMT, FV (Input 
any three and calculate 
the fourth.) 


mn, b, PV, FV (Input 
any three and calculate 
the fourth. ) 


Sinking fund Periodic savings 


insurance 


























Use START or set 
PMT to zero. 


Compound amount 

Savings 

(Annuity mode is not applicable and has 
no effect) 






Equations: 


PMT A[ 


1—(1 +i)-"] + (BALorFV) (1 +i)™ 


PV=t 


where ] ordinary annuity 


(1 +1) annuity due. 


The sign is plus if FV is zero and minus if PV is zero. 
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Remarks: 


The calculator must be in FIX display mode to solve for 1 when payments are 
involved. 


The equation above is solved for i using Newton’s method where: 


This is why solutions involving PMT and i take longer than other solutions. 
The algorithm works best for positive input values and for interest rates 
between zero and 100%. It is quite possible to define problems which cannot 
be solved by this technique. Such problems usually result in an error message 
but may simply continue to run indefinitely. 


Iterative interest solutions are accurate to the number of significant figures 
of the display setting. It is possible to obtain more significant figures by 
changing the display setting from DSP 2 to DSP 3, DSP 4, DSP 5, etc. How- 
ever, time for solution increases as accuracy is improved. 


Problems with negative balloon payments may have more than one mathe- 
matically correct answer (or no answer at all). While this program may find 
one of the answers, it has no way of finding or indicating other possibilities. 


0. G3. , GS) and GAB may be used to review associated 


values at any time. 


Registers Rop—R» and Rgop—Rgg are available for user storage. 


INPUT OUTPUT 
DATA/UNITS DATA/UNITS 


Number of periods 





Periodic interest rate 


Present value 





Future value, balloon or balance 











Ptr re et rt rt 


a .- 





‘-t ' | | a) | 


‘aL 





=| 


e_? 


| 


_— 
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OUTPUT 
DATA/UNITS 
FV, (BAL) 







STEP KEYS 


INPUT 
INSTRUCTIONS DATA/UNITS 


alculate the unknown value. 


: 
Number of periods ee 
P 










o 


eriodic interest rate 
eriodic payment Cc 


P 
Present value 
e 


uture value, balloon or balance i 


Output values inn PMT PV, 
FVBAL ord 
Foranew case, gotosteps 
and change appropriate values. | 
Input zero for any value not 
rene irencm, —_f 
ae 
ae 
a 
se 


N 





a 


Example 1: 


xe 
@ 


If $155 is placed in a savings account paying 534% compounded monthly, 
what sum of money will be in the account at the end of 9 years? 


FV? 


1 2 3 7 8 of] 


A PV =155 


Keystrokes: Outputs: 














"Oo 15600 155.00 
5.75 28 ‘B | 0.48 

9G 120 600 108.00 
B 259.74 


05-05 
If the interest is changed to 6%, what is the sum? 


0.50 
265.62 





6 MiG 1° Go G 
Ba —-__—— 





Example 2: 


What is the monthly payment required to fully amortize a 30 year, $30,000 
mortgage if the annual percentage rate is 9%”? After solving the problem, review 

















the values. 
fe LE of [vos] 
[] SPMT?PMT? PMT? PMT? PMT? 
PV=30, 000 
Keystrokes: Outputs: 
NO30GED’2e Goo 360.00 
30000 D 30000.00 
9 a = 'B | 0.75 
> 241.39 
cs ie a. SOU FP tm) 
08 sla (i) 


241.39 *** (PMT) 
30000.00 ***(PV) 
0:00 *** (FV) 


Example 3: 


A fixed term annuity is available which requires a $35,000 initial deposit. In 
return the depositor will receive monthly payments of $231 for 20 years. What 
annual interest rate is being applied? 


Dep: aff 
DE OE CE 2 6 6 Rn ee SheeeRAS 
[| PMT PMT PMT PMT PMT 


231 231 231 231 231 
PV = 35,000 





= 
| 














= 
= 
= 
aj 
= 
4 
4 
4 
4 
4 
P 
- 
4 
4 
4 
4 
4 
— 
—; 
: 
3 
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Keystrokes: Outputs: 

© @ 35000 D | 35000.00 

231 231.00 

20 128 Q 240.00 

B 0.42 (0.42% monthly) 

12 5.00 (5% annual 
interest rate) 

Example 4: 


Two individuals are constructing a loan with a balloon payment. The loan 
amount is $3,600 and it is agreed that the annual interest rate will be 10% with 
36 monthly payments of $100. What balloon payment amount, to be paid 
coincident with the 36'" payment, is required to fulfill the loan agreement? 


Boao 8 


5 PMT PMT “PMT PMT PMT 
100 100 100 100 100 
PV = 3600 BAL? 
Keystrokes: Outputs: 


0 0300GD0 DEI ?es 
60 O3>G00 (0G9GB — 675.27 


(Note that the final payment is $675.27 + $100.00 = $775.27 since the final 
payment falls at the end of the last period.) 


Example 5: 


A corporation has determined that a certain piece of equipment costing $50,000 
will be required in 3 years. Assuming a fund paying 7% compounded quarterly 
is available, what quarterly payment must be placed in the fund in order to 
cover this cost if savings are to start at the end of this quarter? 


FV =50,000 
Dee EE ME € 8 6 i we 
PMT? PMT? PMT? PMT? PMT? 
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Keystrokes: Outputs: 


© © 5000 6 @ 3 MED‘ 
GO 8 7 Gian +e Go a @——> 3780.69 


What single amount, invested immediately, would provide the same effect? 





0 | 40602.89 


Example 6: 


A ‘‘third party’’ leasing firm is considering the purchase of a mini-computer 
priced at $63,000 and intends to achieve a 13% annual yield by leasing the 
computer to a customer for a 5-year period. Ownership is retained by the 
leasing firm, and at the end of the lease they expect to be able to sell the equip- 
ment for at least $10,000. What should they establish as the monthly payments 
in order to realize their desired yield? (Since lease payments occur at the start 
of the periods, this is an annuity due problem.) 


a A + 6 @ RN KARR REET 
| PMT? PMT? PMT? PMT? BAL= 10,000 


-PV=63,000 


Keystrokes: Outputs: 


=" OO 0000 GOO 3 GD 2a 
GO 85 GED 1° 60 oO 


10000 BY G 1300.16 





If the price increased to $70,000, what should the payments be? 
70000 D | 1457.73 





If the payments were increased to $1500 what would the yield be? 


1500 B | 1.18 (% per month) 
12 & 14.12 (% per year) 











i | 





imnmmmmemmammanmmanmnanmmmmnwmee 














A; 6A) h6CUkhCUMCiSCi«CKRETCiCK‘{E’TCGéCa{YCiéidKm™sSCsCkm®)SCésCédhkm®:CSCoUCaa) hClmCtiC<iACiéChhCUCA/iCiaAA?C ha) OCLC lets 
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For more accuracy in calculation of the interest rate, change the display setting 
to five places and calculate the interest rate. 








6) @ 1.17700 
12 14.12399 
Return display to two places. 

(2) 14.12 
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FOLLOW ME 


FOLLOW ME 


Ae) CNST END ge) 8 Ke) 





This program allows the calculator to learn a simple set of keystrokes and repeat 
them over and over with different data. The allowable functions are plus, 
minus, times, divide, percent, constant and input-output halt. Up to 23 
operations may be included in a sequence. Constants count as two operations 
each. 


To run the program you would press €J to start. Then do the first of the desired 
calculations using the +, —, X, +, and % functions on the card. Any constants 
that repeat between problems should be followed by the key so they will be 
automatically introduced at the proper times. Where intermediate answers or 
inputs are required, press € for an I/O halt. To signify the end of the sequence 
press §. 


After the sequence has been learned by the calculator, only variables need be 
keyed in at I/O halts. The ( key is used to start execution after I/O halts. 


If an error is made while running a sequence, press § to start over. If an 
error is made while teaching the calculator a sequence, press €J for a restart. 


FOLLOW ME INSTRUCTION SET 


Program ; 


Clears program from Follow Me memory and prepares 
for a new program sequence. 





Defines the end of a sequence of keystrokes and resets 
program counter to the beginning of Follow Me 
memory. 







FOLLOW Starts halted program. 





Programmable 
Operations 


-+- 










Adds content of X register and Y register leaving result 
in X register. 






Subtracts content of X register from Y register leaving 
result in X register. 









. ‘J - - 





FF 


‘a | — 


ok 


“—— > 
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Program Action 
Control 


Multiplies content of X register by content of Y register 
leaving result in X register. 


















Divides content of Y register by content of X register 
leaving result in X register. 


Multiplies content of Y register by content of X register 
divided by 100, replaces X register content with re- 
sult and leaves content of Y register undisturbed. 
Recalls constant to X register (requires two steps). 


Input or output halt causes Follow Me to stop for display 
of calculated results and/or input of variables. 


Remarks: 


All four registers of the operational stack are available for input and output of _ 
data. By using all four registers the need for I/O halts can be minimized. 
Keyboard functions other than +, —, X, + and % may be used during I/O halts, 
but cannot be incorporated in a Follow Me program. 

All data storage registers are used. 

A flashing 24 results if more than 23 operations are attempted. This error con- 
dition may be cleared by pressing GB. 


INPUT OUTPUT 
INSTRUCTIONS patajunits “KEYS | pata/uNITS 


Load side 1 and side 2. ae 
2 
Perform first string calculation ee 


STEP 





here aattint oop | 
S estes arcane | 
Sart rach en, | 
Be ores sbrecion, | 
(2 coach mata, | 
Brean son and 
a 
ane 
a 


for percent operations. 23 
steps are allowed (constants 


























Key in variable(s) and initiate one +} {~—- 
ee 
a |nenererwasmedeinseps | | 

pote sepsandrove, | | 

"7 [Gow sep tve untcacucion | | 
ee 
a [Foranew caulatonotme | | 
[same type gotostep 8; | 
2 ee te 
—_ as 


For a new type of calculation, 


go to step 2. 


Example 1: 


Using Follow Me, program 
Y= Ie a Q) 


and calculate y for the following data: 
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A solution: 

Keystrokes: Outputs: 
(Start) 

ry 0.00 
(/O) (/O) (+) (X) 

3060o47a 0-4 30.00 
(End) 
'D| 0.00 
3B58B3:B 39.00 
3B OB 118 60.00 





ee oe oe 


TT TT 











IT, 





C Ui t it tit Peet 


7 os 80 ee Os 8s ea we we wees «sean OClUeslCU rll OOO OSlCUlUcr!}!TOTCtS 


"i 
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A better solution: 








Keystrokes: Outputs: 

A 0.00 

(CNST) 

30 (GED 4+ Boo oN Be —> 30.00 

D | 0.00 
60.00 





Bias ''1B 


Best solution (uses least amount of Follow Me memory): 

















Keystrokes: Outputs: 
AL 0.00 
(Emi na3:ane 30.00 
|D 0.00 

5 8B 39.00 

9 lg 60.00 


Example 2: 


A company determines the retail price of its products by adding the fixed cost 
of assembly and distribution to a variable parts cost then multiplying by 2.7. 
The company sets the wholesale price at 50% of the retail price. Use Follow Me 
to determine the retail and wholesale prices for the parts cost list below. 


PARTS COST LIST 


PART # PARTS COST 


$17.35 





Retail cost = | Parts + Fixed | x 2.7 
Wholesale cost = 50% of retail cost 
Fixed cost = $25/unit 
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Keystrokes: Outputs: 


Teach the sequence to the calculator and 
compute results for the first part #. 


O03 GMs5en002780 



































B | 114.35 (Retail) 
50 »B = ee Ui (Wholesale) 
D | 0.00 

Compute prices for other parts. 

21.188 124.69 

B 62.34 

26.07 8 137.89 

B 68.94 

28.758 145.13 

i 72.56 

33.158 157.01 

G 78.50 

Example 3: 


Use Follow Me to help evaluate the following formula using the data below. 


y = 0.75 A e® 8 


“Al |28| 87/64. 
“t 40/20/45 60. 






Keystrokes: Outputs: 
0:1 3G GHab & 23 














GY Se0aea vg 3.24 
es 
208 Oe 2.3:8- 7.40 
45B 0 ec) 3.778 > 47.26 
608 Oe) 648 210.32 


Any keyboard function may be used during I/O halts. 


rTrThH 





mm uanmnmnmnnaefr-mtewmBeRmBRRenRnemrmerReReBaePRrtrweese®@ 
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NOTES 
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| TRIANGLE SOLUTIONS 


A 
ata 
A3 5 Ao 





S14S24S3 A34Si4A1 Si#Ai4A2 Si#Ai#S2 S14S24A2 


This program can be used to find the area, the dimensions of the sides (S,, Sz, 
S;) and the angles (A,, As, Ag) of a triangle. 


‘ | ? | 5 | 
§ i 

? 7 
j 








Simply key in three known values and press the corresponding user definable 
key. The calculator will successively display the values of the sides, the angles, 
and the area. The order of output is determined by the order of input. If input 
values are selected in a clockwise order around the triangle, the outputs will also 
follow a clockwise order around the triangle. The order is as follows: 


First side input (S;) 
Adjacent angle (A,) 
Adjacent side (Sz) 
Adjacent angle (Ag) 
Adjacent side (Ss) 
Adjacent angle (As) 





Area 


After calculation has ended, the area will be in the display, S; in Rg, A; in Rg, 
S, in Rg, Ae in Re, S3 in Rp, and Ag in Rx. 


Equations: 


S,, So, Sg (all sides of triangle are known) 


A; = 2 cos"! PR Se) 
; V S183 
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where P = (S, + S. + S3)/2 


A, = 2 cos“? (a 2 
So S3 


A, = cos"! (—cos (A; + Ag) ) 


A3, S;, A; (Two angles and the included side are known) 
A, = cos! ( —cos (A; + A,) ) 


sin Ag 





Ss, =S 
: ' sin A, 


Ss = S, cos Ag + Sy cos A, 


S,, A;, Ay (side and following two angles known) 
A; = cos ! ( —cos (A, + Ag) ) 


Problem has been reduced to the As, S,, A, configuration. 


S;, A,, Sg (wo sides and included angle are known) 


S3 = JS? + So = 2 Si So COS A, 


The problem has been reduced to the S,, S,, Ss configuration. 


S;, S2, Ay (Two sides and the adjacent angle known) 


* 
A; = sin”! | S2 sin A, | 
Si 


A, = cos7! [ —cos (A, + As) | 





The problem has been reduced to the As, S;, A; configuration. 


*Note that two possible solutions exist if S. is greater than S,; and A; does not equal 90°. Both 
possible answer sets are calculated. 
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Area=1/2 S, S, sin Ag 


Remarks: 


Registers Ro - Rg, Rso - Rsg and I are available for user storage. 


Angles must be in units corresponding to the angular mode of the machine. 
Degrees mode is set when the program is loaded. 


Note that the triangle described by the program does not conform to standard 
triangle notation; i.e., A; is not opposite S;. 


Angles must be entered as decimals. The conversion can be used to 
convert degrees, minutes, and seconds to decimal degrees. 


Accuracy of solution may degenerate for triangles containing extremely small 
angles. 










INPUT 
INSTRUCTIONS DATA/UNITS 
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OUTPUT 
DATA/UNITS 













Qeee 
Dosis 
es ee eee 
Mier step2,the vauesofthe | 

sides and angles of the triangle a ae 

are successively displayed. The 
first value output is the first 

side input. The next five outputs 


are the remaining angles and ee ee 
sides. The last output is the ae ae 
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Example 1: 


Find the angles and the area for the following triangle. 


2.75 


Keystrokes: Outputs: 

2 | 2.75 GY 2 Fe" 
129.84 *** (Aj) 
1.00 *** 
33.95 ***  (A,) 
pm fe ec 
16.21 *** (As) 
Ot =o (Area) 























(9) 2.00 
A 129.84 
iB 1.00 
33.95 
3 2.75 
3G 16.21 


Example 2: 

A surveyor is to find the area and dimensions of a triangular land parcel. From 
point A, the distances to B and C are measured with an electronic distance 
meter. The angle between AB and AC is also measured. Find the area and other 
dimensions of the triangle. 








171.63 
meters 


297.35 
; meters 
98° 12 


This is a side-angle-side problem where: 
S, = 171.63, Ay = 98°12’ and S, = 297.35. 


TT TReRmRememremremrenmnrmrenmrmnrnintrmternmtrnrmrtee® ® 
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Keystrokes: Outputs: 
171.63 98.12 
297.35 171.63 *** (AB) 





98.20 *** (LA) 
297.35 *** (AC) 
27.83 *** (LC) 
363.91 *** (CB) 
53.97 *** (7 B) 
25256.21 ***(Area) 


Example 3: 


A pilot wishes to fly due north. The wind is reported as 25 knots at 77°. Because 
winds are reported opposite to the direction they blow, this is interpreted as 
77 + 180 or 257°. The true airspeed of the aircraft is 140 knots. What heading 
(HDG) should be flown? What is the ground speed (GS)? 





By subtracting the wind direction from 180 (yielding an angle of 103°), the 
problem reduces to a S,, Sz, Ag triangle. 





Keystrokes: Outputs: 

140 pd lB 140.00 *** (TAS) 
66.98 *** 
25.00 *** (Wind velocity) 
103,00: *** 


132.24 *** (GS) 
10.02 *** (HDG) 
1610.64 *** 


Thus, the pilot should fly a heading 10.02° east of due north. His ground speed 
equals 132.24 knots. 
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VECTOR OPERATIONS 


VECTOR OPERATIONS 


Vee VixV2 Vi°V2 01401461 d2#024r2 





This program performs the basic vector operations of addition, cross product, 
and dot or scalar product. It also allows conversion between spherical and 
cartesian coordinates and can find the angle between two vectors. 


Either two-dimensional or three-dimensional space may be selected using the 
© €§ keys. The machine is set in two-dimensional mode when the program is 
loaded. The first press of {9 (QJ yields a display of 3.00 indicating three- 
dimensional space. Repeatedly pressing (() €§ will yield alternate displays of 
2.00 and 3.00 indicating the mode of the machine. Be sure the mode is correct 


before input of data. 

Another available option allows review of input values. Pressing () & 
causes a 1.00 to be displayed alternately indicating that the pause input mode is 
on or off. A print stack command is used to successively display the inputs in 
the following format: 


Vectornumber (1.00 0r2.00) T 
¢@ (or 7 + 2 for 2D vectors) 2Z 
7) Y 
r X 


Vector outputs are displayed in the following order: 


POLAR FORM RECTANGULAR FORM (SC only) 
0.00 T 0.00 T 
p Z Z Z 
0 » y Y 
r X X X 
Equations: 
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Coordinate conversions: 


x =rsin dcos 6 r= Vx’ + yy + z 
y =rsin dsin 8 6 = tan“! (y/x) 


z=rcos = cos (2/ Vx2+y? +2? ) 
Vector addition: 
Vi + Vo = (X%1 + Xe) i + (yr + Yo) J + (1 + Z2) k 
Cross product: 
Vi X Vo = (¥1 Zo — Z Yo) t + (2 Xo — Xt Zo) J + (Kr Y2 7 V1 Xo) k 
Dot or scalar product: 
V; ° Vo = XK, Xo + Y1 Yo + Zi Zo 
Angle between vectors: 
V, . V 
Vi] [V2 


y = cos ' 


Remarks: 


Registers Ry — Rg and Rgo — Rgg are available for user storage. 


INPUT OUTPUT 
STEP INSTRUCTIONS patajunits KEYS pata/uNits 


Select mode for 2-dimensional ne 
1.00/0.00 









3 Optional: Select pause input 


If coordinate conversion ae 
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INPUT 


STEP DATA/UNITS 


INSTRUCTIONS 


OUTPUT 
KEYS | DATA/UNITS 








Input vectors one and two: 


() 
) 


hm a = | a 


: 
4 


Input spherical coordinates: 





“SJ 





(converts to Cartesian) 
Co-latitude (skip for 2D) 
Longitude 
Magnitude 


or anew Case go to steps 2, 3, 


— 


0 Input Cartesian coordinates 

converts to spherical) 
z—distance (skip for 2D) 
y—distance 


x—distance 


ie) ie) 
| = 
on on 


—h 
— 


7 


or a new case gO to steps 2, 3, 





aN 


or 5. 





Example I: 


An aircraft flies a heading of 212 degrees at 225 knots. The wind is reported at 
20 knots and 140 degrees (which translates to 20 knots and 320 degrees since 


rn wnmhPRmnRrrmrthrmrmRrRmnmnanannt wan @ 
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iM 
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winds are reported opposite to the direction they blow). What is the course of 
the aircraft? What is the ground speed? 


N 








W 


Course = 216.97° 


Ground speed= 
219.64 knots 


Heading= 212° 
True airspeed= 
225 knots 


S 
Wind =20 knots at 320° 














Keystrokes: Outputs: 

Hoa co 2.00 

zl2 225 1.00 

320 208 2.00 

AL 0,00 =F* T 
90.00 *** Z 


216.97 *** Y (degrees) 
219.64 *** X (knots) 


Example 2: 


A microwave antenna is to be pointed at a transmitter which is 15.7 kilometers 
north, 7.3 kilometers east and 0.76 kilometers below. Use the cartesian to 
spherical conversion to find the total distance and the direction to the 


transmitter. 





Keystrokes: Outputs: 
“oO 3.00 
.16 15.7 
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7.3 @gBe 17.33 (distance) 

ih] 65.06 (0 from east) 

Lh 92.51 (fh from vertical) 
ih 0.00 

ih] 17.33 (back to distance) 
Example 3: 


What is the moment at the origin of the lever shown below? What is the com- 
ponent of force along the lever? What is the angle between the resultant of the 
force vectors and the lever? 


F,=17 (newtons) 
g=215° 
=17° 






Fp = 23 (newtons) 
@=80° 























$=74° 
y 
Keystrokes: Outputs: 
First, add F, and F, 
en Al 3.00 (3D mode) 
17 SEY 215 Gey 17 1.00 
74 80 238 2.00 
AL 0.00 *** T 
39.34 *** = Z 
90.70 *** Y 
29.47 *** X (newtons) 
Keystrokes: 7 Outputs: 
Take cross product for moment, M = XP 
G 2.00 
63 GEG 125 GE |.07g 1.00 
|B 0.00 *** T 
124.34 *** Z 
55.37 #** Y 
18.02 *** X 





| 


AP = P 
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Take dot product to resolve force along the lever. 








Keystrokes: Outputs: 
63 GERD 125 Gey | 1.00 
24.19 ***  (newtons) 


34.85 *** (degrees) 
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POLYNOMIAL EVALUATION 


[ a 
POLYNOMIAL EVALUATION 


, ' 
~| > SOLVE 


5} xt) ao ay(x) ar(x2) —ag(x3) 





This program may be used to find the roots of the following equations: 


Cubic equation (3 roots) 
f(x) = a) + ax + ax”? + agx® = 0 
Quadratic equation (2 roots) 
f(x) = ay + ax + aox* = 0 
Linear equation (1 root) 


f(x) = a + a,x = 0 





where ay, a, a2 and ay are the polynomial coefficients input by the user. 
Both real and imaginary roots can be extracted. When imaginary roots are 
found, a -1. is displayed followed by imaginary and real parts. Real roots are 
displayed without the -1. indicator. Example 3 involves imaginary roots and 
should make this clear. | 


Polynomials may also be evaluated for arbitrary values of x. This is of aid 
in plotting polynomials and using data correlations based on polynomials. 
Example 2 demonstrates this type of use. 


Equations: 


Cubic Equation: 


3a, — alas 


Q= 9a 
R = Qa,a,/ag — 27a — 2a3°/a,? 
54a; 
S= VR+VQ?+R? 


T= VR-VQ?+R? 


a 


nmmraninrnmemnnannmnmrnmrinrRnmimrnmrnmrree 
Ol i ae 


mm 
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If Q? + R? = 0, 
ag 
then X3 =S+T- 
3as 
If OF + R* <0, 





then X3 = 2V—Qcos |+ cos (R/V —Q*) | = = 
3 


After xz is found, synthetic division is performed to reduce the cubic equation 
to a quadratic equation. 


a, = 1.00 
ajlay = X3 + ag/ag 


ajlay = X3(X3 + a/as) + ay/as 


Quadratic equation: 
— 21 — V(a,/2az)¥ — (aglaa) If —ay/2a, <0 
2a 


- - + V(a,/2a,)? — (agla2) If —a;/2a, = 0 


2 





A = 





ay 





Xo = 
agX4 


Linear equation: 


ao 





ay 


Remarks: 


Registers Ro, Rs — Rg, and Rgy — Rgg are available for user storage. 





Accuracy degenerates if the real root of the cubic equation is extremely small. 











INPUT 
DATA/UNITS 





STEP KEYS 


INSTRUCTIONS 


Load side 1 and side 2. 


Input coefficients of Polynomial: 


sd a a ea] 
a >| 


OUTPUT 
DATA/UNITS 





wo  — 


Constant 


: 





Example 1: 


1 
3 
X 








A ball is thrown straight up at a velocity of 20 meters per second, from a 
height of 2 meters. At what time, neglecting air resistance, will it reach the 
ground? The acceleration of gravity is 9.81 meters per second. From physics: 


f(t) =x= Xo + vgt + > at? =0 


= 2 + 20t + (—9.81/2)t? =0 


Keystrokes: Outputs: 
"eB 0.00 
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2208 9.81 
280GD0 °° GB 





4.13 *** (seconds) 
—0.10 *** (seconds) 


The answer is 4.18 seconds. The second root of —0.10 is a legitimate root of 
the equation but is not relevant to this problem. 


Example 2: 


The standard heat of formation of ammonia (NH) is given as a function of 
Kelvin temperature by: 


AH? = —9140 —7.596 T + 4.243 x 10°° T* —0.742 x 10-© T? (cal) 


Determine the heat of formation for temperatures of 400 K, 600 K, and 800 K. 











Keystrokes: Outputs: 
» QB 0.00 
9140 G 7.596 2.00 
4.243 Gay 3B .742 

G33 6B 4.00 











400 Gy ~11547.01 (cal) 
600 GY —12330.39 (cal) 
800 £Y —12881.18 (cal) 
Example 3: 


Find the roots of the following equation. 
x? — 4x? + 8x —8 =0 


Keystrokes: Outputs: 


ao%:epoase 
1GS0 B06 








2.00 *** (real root) 
-l. (indicator) 
1.73 *** | (imaginary part) 
1,00 *** (real part) 


The real root is 2.00. The imaginary roots are 1.00 + 1.73i and 1.00 — 1.7331. 


The —1.(which is not followed by asterisks) indicates that the last two 
outputs will be imaginary and real parts rather than real roots. 
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3 X 3 MATRIX OPERATIONS 


3X3 MATRIX OPERATIONS 


Pe vind 





a144a24a3 biy@bo4b3 C14C24C3 «= 4a 4d3 MAT P 










This program can be used to find the determinant or generate the inverse of 
: a3 X 3 matrix. It can also multiply a3 X 3 matrix by a column matrix. By 
) using the matrix inverse function in combination with the matrix multiply 
function, it is possible to solve three linear equations in three unknowns. 










Equations: 
a, by Cy 
Matrix A = | a by Co a 
as; bs Cs - 
d, : 
Matrix D = | d 
ds 





Determinant of matrix A 





Det =a, bec, +b, Co ag + Cbg ag 


—C, be ag C5. Da Ay — Cz ae by 


Inverse of matrix A 


a BN 
Al = A Bo Yo 
a3; Bs Y3 


Q, = (by C3 — bg Cy)/Det 
Ol = (a3 Co — ay Cz)/Det 
Q@; = (a bs — as b.)/Det 
B, = (bs cy — by, c3)/Det 
Bo = (a, C3 — a3 C,)/Det 
Bs; = (a3 by — ay bs)/Det 









il 

















. ee) oe | 
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. (b, Co — be c,)/Det 
ye (ay Cy — ay C,)/Det 


¥3 


Matrix multiplication 


a, d, 
A:D = ao by 


az; bs 
a,d, +b 


eae aod, + b 
a,d, +b 


Remarks: 


During matrix inversion, A~' replaces A in 


(a, by — ay b,)/Det 


id, + C1d3 
ody + Cod 
3d, + C3ds 


storage. If you wish to save matrix 


A, store it on a magnetic card before starting the inversion process. 


Two by two matrix operations can be performed with this program (see 
example 2). A 2 X 2 matrix should be input in the following form: 


a, b, 
A= ay by 
0 O 


The corresponding column vector is: 


d, 


If the determinant of a matrix is zero, the 1 


0 


nverse cannot be found. 


Registers Rgo—Rgg are available for user storage. 


Matrices may be output at any time by pressing @. The order of output is 


ay, a2, a3, by, bo, bs, Ci, Co, C3, di, do, ds. 








10-03 


INPUT 
DATA/UNITS 


OUTPUT 


INSTRUCTIONS DATA/UNITS 


KEYS 


Load side 1 and side 2. 


2 Input 3 x 3 matrix: 


m 


Column 1 ENTER4 


wo 
wo 


oy 
oO 


Column 2 


oO oO 
ro) 


Column 3 


oO 
Nn 

‘?) 
Ns 


oO 
w 

oO 
ro) 


3 |For solution of simultaneous 
equations or multiplication of 
he 3 x 3 matrix by a column 


matrix, input column matrix. 


©. 
wo 


o find a determinant go to step 
. To find the inverse or solve a 
x 3 system, go to step 8. To 


erform multiplication, go to 


5 Find the determinant of the 
For a new case,go to step 2. 
Change any or all of the columns 


in step 3. 


© Hilo lola] 4 =e 
x 3 
Ww — 
oO 
3 ; 
pe) 
tal 
=: 
x 






If you wish to save the 3 x 3 


matrix for future use, record it 


on a magnetic card. 


~” 
=f 
N a = m 
me] 
m m m m m m m 
= z 4 G) 4 4 0 | 4 z 4 
= = s a = = 4 
>| m m m m m m m 
yD bo) D bo) po) bo) bs) 
> > > > > > > 


a a a a a a a ee i ee ee ee ee ee 





= 0 6kmlC elt lO CeCe ee St ea ee tC Ce 


aU 


[.)hUlUe|hUCUmhrhe|h|hUhUmrhrhe|hUhUmcelhe|)hUhUmrlhlDhUCUCUCrlhlhmlC OlC( mM T)DlU CO .lhlC CC OlCUOOlhlCUCUrCOCUC .lhlUCUlDhCUCCOC lC CC OllCLCTTlCUCOOlC llCUCrClClCUCCTlClCUC Ol OrlC SOCKS Ct~‘;<;é‘C 
' t j : ; , 
Q + : j f t § 

Va a _—-_ = = = = 


us 
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OUTPUT 
DATA/UNITS 





INPUT 


patajunits | KEYS 


INSTRUCTIONS 









Find the inverse. 







For a solution of a3 x 3 system 





go to step 10. For a new case go 


STEP 
8 
9 
to step 2. The original 3 x 3 
Pica matrix has been replaced in 
- storage by its 3 x 3 inverse. 







__[eolumn mati. (The resuting 
[column matric outputin x,y, 2 
jorge 
-___|eolumn matrix perform step 3, 
then press @. Fora new 
__Jeasegotostep2, 


> fd 
G) a 


Example 1: 


Find the determinant and inverse of the following matrix; then multiply by the 
column matrix. 


Zz I> Mf 








8 11 -6 ] 

4 15 12 ] 
Keystrokes: Outputs: 
23 8 40 4.00 
1S GED 11 Gap 50 15.00 


17 GED 6 GS GED 12 @ ———> 12.00 
| GED | GE 18 1.00 
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em Al 4598.00 (determinant) 
> 8 0.00 (inverse found) 
B 0.05 (a) 

—0.03 *** (a) 

0.02 *** (a3) 

0.02 *** = (By) 

0.05 *** (B2) 

-0.06 *** (B,) 

-—0.06 *** (¥,) 

0.06 *** (Y2) 

0.03 *** (Y3) 

1.00 *** (d,) 

1.00 *** (d,) 

1.00 *** (ds) 

(results of multiplication) 
te 4.349717270 —03 *** 

0.05 *** 

—0.02 *** 


Example 2: 


Find the determinant and the inverse of the 2 < 2 matrix below. After the 
inverse has been found, multiply by the column matrix. 


he 


First transform the matrices to three dimensions as specified in the remarks 
section: 


14 -8 O 20 














-8§ 12 O 5 

0 0 1 0 
Keystrokes: Outputs: 
14 GED 8 On 0.00 
; 2 D0 8 0.00 
0 GED 0 GND | 1.00 
20 5 0B 0.00 


{ 





j q 5 a ; ; j f : ' 





- n,n eS eS |e eS LS eS eS SS eS eS ss Ox =| 
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en Al 104.00 (determinant) 
» BoB 0.00 (inverse has been 
found) 

 — US aa (a) 

0.08 *** (dQ) 

0,00" *** (a3) 

0.08 *** — (By) 

0.43 (Bo) 

CLOG +++ (Bs) 

B00" A) 

0.00 *** —— (Y) 

1.00 *** = (ys) 

20.00 ***  (d,) 

>.00 *>* (d.) 

0.00 *** (ds) 
f | 2.69 *** (results of 

eS multiplication) 
Example 3: 


Solve for the loop currents in the following circuit. 


82 12 





40V 


The three loop equations are: 


Loop | 41, - 41, + 151, — 15 1, — 40 =0 
Loop 2 41,-41, +81, +101, — 101, =0 
Loop 3 Oi, ~ 101, +11, +151 — 151, =90 
or 191, —4I1, — 151, = 40 


pwede eee eae 
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or in matrix form 


19 -4 
-4 22 
-15 -10 
and 

I, 19 
I, — —4 
I; -15 

Keystrokes: 





-15 I, 40 
-10 I, = 0 
26 I; 0 
-4 -15}|~' |40 
22 -10 
-10 26 
Outputs: 


19 GE 4 GS GEM 1S GO — -15.00 
4S GIG 22 GED 10 aS O — -10.00 
IS GS GED 10 GS GHG 26 B — 26.00 











40 0 08 0.00 

"Oo 0.00 

a 7.86 **# 
4.23 *#+ 


(inverse has been 
found) 


(11) 
(Ip) 
(Is) 
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NOTES 


Ct 











CALCULUS AND ROOTS OF f(x) 


CALCULUS AND ROOTS OF f(x) 


1,2,3,4,5? x= f/(x) X > f(x) ngasbes° x,root 





This program incorporates four routines for numerical analysis of user specified 
functions. Suppose figure 1 represents a known function of x called f(x). 


f(x) 


Figure 1 


If the formula for f(x) can be keyed into program memory in less than 112 steps 
(including LBL and RTN), this program can be used to find the value of f(x) 
at any point x, the derivative of f(x) at any point x, the integral of f(x) over a 
specified interval and the real roots of f(x). There may be up to five different 
f(x) functions in program memory at one time. They must be labeled from 1 to 
5. The function to be evaluated is selected by keying in 1, 2, 3, 4 or 5 and 


pressing {Y. 


Only side 1 of Calculus and Roots of f(x) is used for the program. Side 2 of 
Calculus and Roots of f(x) has three functions recorded on it. These will be used 
in the example problems to show various applications of the program. You may 
wish to record functions you use frequently on blank magnetic cards. Once 
recorded, the functions can be linked to Calculus and Roots of f(x) by the 
following sequence of operations: 


Load side 1 of Calculus and Roots of f(x). 


l 

2. Press Gy (-) (4) G) (2). 
3. Press &} (MERGE). 
4 


Load your magnetic card. 


Once a function is defined and selected, keying in a value of x and pressing 


the key will result in the evaluation of f(x) (see figure 2). 


"RUM UMMmMMUDDHMODHemeanene se 





Tt 
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Figure 2 


Similarly, the value of the slope of f(x) at a particular point x can be calculated 
by keying in x and pressing the J key (see figure 3). The slope of f(x) is 
determined using an approximation to the differential: 


f(x) = f(x + anid) — Ax — Ax/2) 


ve 4 60OClokCti“‘i‘i | hCUC<CiK hCUCUll LC lhCUlUllr UCU lk lO a la a tia ATC kr lC Kh  lCU rl 





Figure 3 


La 


The value of Ax used to approximate the differential is assumed to be 0.01% 
of x (10-4 X x) unless a % A is specified by the user. That is: 


Jo A 
100 





Ve Ae ee 


In the special case where x = 0, Ax is set equal to %A. 


For most applications, the assumed value of 0.01% should be adequate. In 
some cases more accurate results can be obtained using a smaller value of 


= 
4 
~4 
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% A. However, care must be taken to assure that the calculator can accurately 
resolve the difference between f(x — Ax/2) and f(x + Ax/2). 


The @ key may be used to approximate the integral or area under a curve. 





Figure 4 


You specify the end points of the interval (a and b) and the number of 
rectangles (n) the interval should be broken into (see figure 4). The calculator 
computes the sum of the areas of the rectangles. The more rectangles used the 
closer this value is to the actual area under the curve. However, more rectangles 
mean more computation time. Experience with a particular function should lead 
to a balance between accuracy and execution time. 


Root finders are used to solve equations which are difficult or impossible to 
solve explicitly. An example of such an equation is 


f(x) = Inx + 3x — 10.8074 =0 
which is solved in example 4. 


The root finder incorporated in this program uses a secant method of approxi- 
mation. You must supply the routine with an initial guess of the root. Based 


on this guess, it will attempt to make better and better approximations of the 
root by the following formula: 


a (Xj — Xj-1) 
Xi4y = Xj f(x;) Ee _ f(x;_1) | 





Figure 5 
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The display is automatically set to fix mode during the root finder portion of the 
program. When the last approximation is accurate to the number of places 
specified by the display setting of the calculator, the routine halts and displays 
the root. 

Since the root finder starts its search based on your guess, care should be 
exercised in guess selection. A bad guess will cause long execution times and 
could result in a machine status error halt (overflow, division by zero, log of a 
negative number, etc.). If this happens, simply try another guess. Practice will 
make the pitfalls more obvious and easier to avoid. 

A special feature of the iterative routine is the pause function. This feature 
allows the program to pause at one point in each iteration to display the current 
approximation of the root. The pause option may be turned off and on by press- 
ing © @. The pause allows you to watch the routine converge (or diverge) 
without interrupting the program. This can be a helpful tool when the iterative 
routine fails to converge. By watching each successive approximation of the 
root, the reasons for failure of convergence can usually be determined. 
Remarks: 


The value of x is stored in Ry by the program. It is also in the X register when 
control transfers to the function subroutine. 


Registers R,-Rg, and Rgo-Rgg are available for use in f(x) or for other user 
storage. 


User-specified functions may use one level of subroutine nesting. 
The secant method does not guarantee convergence to a root. 


Given one guess, the root finder will find, at most, one root of an equation. 
Other real roots, if they exist, may be found by modifying the initial guess. 


In order to compute f’(x), the function f(x) must be continuous on the interval 


(x + Ax/2, x — Ax/2). 


oaTAUNT 


o subroutine(s) loaded in 
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INPUT 
DATA/UNITS 





STEP KEYS 


INSTRUCTIONS 


OUTPUT 
DATA/UNITS 










root, go to step 15 
Optional: Key in percent delta. %A 


7 | Key in x and calculate derivative 
For new x, go to step 7. Fora 


C f, (x) 


Key in x and evaluate function FG) 


O For new x, go to step 9. For a 
new case, goto step 2, 3, 4, or 5 
Input the number of intervals 


— 





1 


coh 


2 __ Input the lower limit 


ak 


O|}9 






J f(x) dx 
1.00/0.00 


13. Input the upper limit and 
calculate the integral 
4 | For new limits or interval, go to 


—s 


step 2, 3,4 o0r5 

ptional: Key in percent delta %A 
ptional: Toggle pause 

ey in guess and calculate root. GUESS 
For a new guess go to step 17. 


For a new case go to step 2, 3, 


new case, go to step 2, 3, 4, 5 
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Example 1: 


Numerical integration provides the only solution to the complete elliptic 
integral of the first kind: | 


i de 
u = 


0 V1 — K? sin6? 


Find the value of u for limits of integration of 0.0 to 7/2. Let K be 0.5 and store 
it in register 1 for access by the program. Use 3 and then 10 for the number of 
intervals. The formula for the integral is recorded under label three on side two 
of the magnetic card. If either example 2 or example 3 has just been run, skip 
the first three lines under keystrokes. 


Keystrokes: Outputs: 
Load side 1 only 


GO (+) 112 & (merce) 








Load side 2 

Select label 3 

3 3.00 
0.50 4) 0.50 


Integrate using 3 intervals 


(osP) (9) 3 GREED 9 GE 
Of 280 


Integrate using 10 intervals 


10 GEEED 0 GED @) 2 @ —> 1.685750355 


1.685750251 





Example 2: 


In the design of gear teeth, it is frequently necessary to calculate x for a given 
value of the involute: 


INV(x) = tan x — x 
or restated 
f(x) = tan x — x — INV(x) = 0 
If the involute of x is 0.0049819, what is x? 


This problem requires an iterative solution since the equation cannot be 
explicitly solved for x. Use 0.21 radians as your initial guess. The equation for 
f(x) is recorded under label 2 on side 2 of the magnetic card. Use the pause 
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feature to watch the routine converge. Skip the first three lines under keystrokes 
if Example 1 or 3 has been run. Store the involute (.0049819) in R, for access 
by the function. 


Keystrokes: Outputs: 
Load side | only 


Gi) (+) 112 ED (merce) 








Load side 2 
Select label 2 
2g —_____________——_>> 72.00 
Set pause 
Qe 1.00 
.0049819 (2) 21g "O25 
°Q.24”’ 
*Q.24”’ 
0.24 (rad) 


Example 3: 


In many instances, a function is represented graphically. This program can be 
of use in integration and, in some cases, differentiation of such graphs. Label | 
of side 2 of the prerecorded magnetic card is designed for this purpose. It 
retums x values to the display. You must find f(x) from the graph, key it in and 


press GR. 


For the function below find the integral from a to b using 5 intervals. Then find 
the derivative at a, using 10% for % A. After the problem is complete, return 
% A to 0.01%. 


f' (1.40) 


20 


15 
f(x) - 
10 





If either Example 1 or Example 2 was run previously, skip the first three lines 
under keystrokes. 


ee ee ee 








A 
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Keystrokes: Outputs: 
Load side | only 


GD (+) 112 EG) (merce) 


Load side 2 


Select Label | 








iQ 1.00 

Key in integration limits and return first x 

value 

5 1.40 4.70) 1.73 (x) 


From the graph, f(x) at x = 1.73 equals 14.2. 
Key 14.2 in and press GJ. The next value 
of x will be displayed. 




























14.2 2.39 

f (2.39) = 16 

16 3.05 

f (3.05) = 17 

17 o.41 

f (3.71) = 16.9 

16.9 4.37 

f (4.37) = 15.3 

13.3 52.40 (Answer) 

To find the derivative at point a 

lOmMgi40g 1.33 (: 7 ) 
f (1.33) = 12.7 

12.7 FS — 1.47 («+ * ) 
f (1.47) = 13.3 

13.3 > 4.29 eh 
Return %A to 0.01% 

Ol gy > 0.01 


Example 4: 
Find the root of Inx + 3x — 10.8074 = 0. Determine the slope at the root. 


This equation is not recorded on the magnetic card. It must be manually keyed 
into program memory Starting at step 112. Use R, to store the 3 and R, to 
store 10.8074. 


Keystrokes: Outputs: 
Load side 1 only 

fe] 172 

Switch to W/PRGM————_—__—___—_—» 112 35 22 
8 Oo 31 25 O1 








~ ON) 
Ges 6) 
Gey (0) 


ges 


(2) 


hh 
Switch to Run 
Select HM G) 
mA) 
3 O) 
10.8074 (2) 
Make a guess of 5.0 
5g 


Find the derivative 









































114 31 52 
115 34 Ol 
116 34 00 
117 Ww 
118 61 
119 34 02 
120 51 


21 35 22 


1.00 
3.00 
10.81 
a1 


eed | 


(Inx) 


(Inx + 3x) 


(inx + 3x — 
10.8074) 


(ROOT) 


t(3.21) 
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NOTES 











ENGLISH-SI CONVERSIONS 


M>Gy ¢W/6y¥>eu/q) zWi/N>Isd r=mg Do>do 
ENGLISH-SI CONVERSIONS 


in mm ftzm gal< | Ibf <= N lbm ¢ kg 





This card provides the more common conversions between English and SI 
(metric) units. Side one of the card provides length, volume, force and mass 
conversions. Side two provides temperature, energy, pressure, density and 
power conversions. Only one side of the card may be loaded into program 
memory at any time. 


Conversion Factors: 
Side 1 of magnetic card 
1 inch (in) = 25.4* millimeters (mm) 
1 foot (ft) = 0.3048* meters (m) 
1 U.S. liquid gallon (gal) = 3.785411784* liters (2) 


1 pound force avoirdupois (Ibf) = 4.448221615 newtons (N) 
1 pound mass avoirdupois (Ibm) = 0.45359237* kilograms (kg) 


Side 2 of magnetic card 


Degrees Fahrenheit (°F) are related to degrees Celsius (°C) by the 
following formula: 
“C =CUP — 321.8 
1 International Steam Table British thermal unit (Btu) = 1055.055853 
joules (J) 
1 pound per square inch (psi) = 6894.7572 newtons/square meters (N/m?) 
1 pound per cubic foot (lb/ft?) = 16.018463 kilograms per cubic meter 
(kg/m?) 
1 horsepower (550 ft-lbf/sec) = 745.69987 watts (W) 


Remarks: 
Only one side of the card may be in program memory at a time. 


All data registers (Ry — I) are available for user storage. The T register of the 
operational stack is lost during conversions. The LAST X register contains the 
input value for all conversions except temperature conversions. 


*By definition. 
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INPUT 
STEP INSTRUCTIONS DATA/UNITS 


4 [orton vote, tee oe 
ass comerion bade 
| Foctenpeaue, eyes 
ie const, poner cer 
Joon gots 

a 











| ernst 9 nenes 
| erpatenstoites | 
TT erttreic gains | 






or kilograms to pounds kg 
For a new case, go to step 2. 




















or psi to N/m? 





or N/m?’ to psi 






or Ib/ft? to kg/m* 


oF 
or Celsius to Fahrenheit 
or joules to Btu 


or Btu to joules 
or watts to horsepower 












or horsepower to watts 


To convert Fahrenheit to Celsius BR 
or kg/m* to Ib/ft® 
For a new case, go to step 5. 
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Example 1: 


Convert % of an inch to millimeters and round to an integer value. 
Keystrokes: Output: 
Load side one 

















e 838 8 9.53 (mm) 
(o) 10. (mm) 
(2) 10.00 (mm) 
Example 2: 

Convert 212°F to °C. Convert 0°C to °F. 

Keystrokes: Outputs: 

Load side two 

212 Gy 100.00 

Om gy 32.00 

Example 3: 


Convert 75 Btu/hr-ft? to joules/hr-m?. (Since ft? is in the denominator, the sense 
of the conversion is reversed.) 








Keystrokes: Output: 

Side 1 

SBBow ese 807.29 (Btu/hr-m?) 
side 2 

B | 851739.50 (J/hr-m?) 
Example 4: 


Convert six pounds per gallon to kilograms per liter. 


Keystrokes: Outputs: 
Side 1 
6B © 0.72 (kg/ 2 ) 





a a 


a | 
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Fl 


* 1 & 
mee SS | SS SS ee eS eS. eee 


ll 


12-04 


NOTES 
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ARITHMETIC TEACHER 


ARITHMETIC TEACHER 





—?p—2 x?e3 =?——4- answer. 


Preschool and elementary school students may use this program to help them 
learn addition, subtraction, multiplication, and division. The program gene- 
rates and displays problems in the following form: 


X.Y 


Where x is one variable and y is the other variable. The child mentally computes 
the answer (x + y, X —y,X X y, orX + y depending on the lesson), keys it in, 
and presses the answer key @. If the answer is correct, the calculator poses a 
new problem. If the answer is incorrect, the calculator returns the problem until 
a correct response is given. 


One lesson consists of 20 problems. After problem 20, the calculator outputs 
number correct, number tried, and percent correct. 


As the child progresses, the maximum size of the numbers, Nmax, may be 
modified. For example, keying in 3 and pressing ) GJ would set the maximum 
number size to 3 for addition and multiplication, 3 + 3 for subtraction, and 
32 for division. For more advanced students, Nnax might be set to 15. If the 
value is not specified by the user, the program assumes a value of 9. 


Remarks: 


The type of problem to be solved (+, —, X, +) can be changed at any time 
during the lesson. When the problem type is selected, a code number is 
displayed for a moment before a new problem is posed. The digit | indicates 
addition, 2 indicates subtraction, 3 indicates multiplication, and 4 indicates 
division. 

If the student realizes that a wrong answer has been keyed in before the @ 
key is pressed, the (J (R¥)keys can be used to eliminate the error and return the 
problem to the display. 

Any attempt to use the calculator to solve the problem will result in an error 
necessitating a restart of the program. 


The number generator incorporated in this program will always give the same 
sequence of numbers unless Nmax is changed or a *‘seed”” Is input. The seed can 
be any number between 0 and 1. To input a seed, simply key it in and press 


Registers Ro - Rg and Rgo - Rgg are available for user storage. 
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SEED 


INPUT OUTPUT 
patajunits KEYS pata/uNits 


rambo size ctaut is). | ma 
Sete 
6 [Select antec mode? 
— Addition 

| Matpieaion 

Sf pwson 

Let student key in answer and ae 


rE number attempted and % 
ia 


1.00/0.00 

Bo prbem 
prem 
a pete 












Subtraction 










For another session go to step 7. 








To change arithmetic mode go 


to step 6. To select print lesson 





mode go to step 5. To sleect a 


new maximum number size go 
to step 4. 


* See page L13-01 for description of algorithm and comments on optional seed selection. 


* After an arithmetic mode is selected a code is output to indicate which mode was set: 1 addition, 2 subtraction, 
3 multiplication and 4 division. 
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Example 1: 


A child is to practice multiplication of the numbers one through eight. 














Keystrokes: Outputs: 

og 0.00 

Select maximum number size of 8. 

809 8 SA tee 

Select lesson type 

3.0 #4 
6.8 

438 1.4 

4B Te 





2180 —— > 8.8 
4B > 7.7 
4B —_— > 74 
2380 —— > 7. 
A nee nen 

LS a 

Lif ———— > 42 
8B 8.6 


4,5 — > 88 





Ca Ee eG 
56 ee | 8G 
48g >» 5.8 
on — > 6.7 
ADR. 2 eee SS 

i ee 5S 
Og > 84 
32 Be > 4.6 
480 > 4 
2380—_—_—_— > US 


6B > 4.7 
2380—________-4- 18.0 *** 


20), 
90.0 *** 


The calculator displays the first problem of the next set. 
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“4 13-04 
4 Example 2: 
a The child of example 1 now wishes to practice division for numbers | through 
10, 
| Keystrokes: Outputs: 
ONB- 10.0 2" 
4 
a 30.06 
o 5B 70.07 
log 30.06 
| 5B 28.04 
7B 32.08 
a 48 6.06 
\G 80.10 
a :B 40.04 
log 16.04 
2 18 80.08 
P log 70.10 
7B 80.08 
4 log 42.07 
6B 81.09 
-_ 9B 7.07 
1 @—— 10.05 
| 28 — 60.06 
68 
4 log - >» 56.08 
1g ——————_ > 56.07 
3 ie na Sa Be ae 70.10 
. 78 —— $$$ > 19.00 *** 
4 20. 
— 95.00 *** 
4 
4 
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MOON ROCKET LANDER 


MOON ROCKET LANDER 





CNTRL RESTART 


Imagine for a moment the difficulties involved in landing a rocket on the moon 
with a strictly limited fuel supply. You’re coming down tail-first, freefalling 
toward a hard rock surface. You’ll have to ignite your rockets to slow your 
descent; but if you burn too much too soon, you’ll run out of fuel 100 feet up, 
and then you’ll have nothing to look forward to but cold eternal moon dust 
coming faster every second. The object, clearly, is to space your burns just 
right so that you will alight on the moon’s surface with no downward velocity. 


The game starts off with the rocket descending at a velocity of 50 feet/second 
from a height of 500 feet. The velocity and altitude are shown in a combined 
display as -50.0500, the altitude appearing to the right of the decimal point and 
the velocity to the left, with a negative sign on the velocity to indicate down- 
ward motion. Then the remaining fuel is displayed and a rocket fire count down 
begins **3’’, **2’’, *‘1’’, *‘0’’,. Exactly at zero you may key in a fuel burn. 
You only have one second, so be ready. A zero burn, which is very common, is 
accomplished by doing nothing. However, if you miss the one second ‘‘fire 
window’”’ and then try to key in a burn, your engine will die and you will have 
to restart by pressing &. This automatically uses 5 fuel units and gives no 
thrust. After a burn the sequence is repeated unless: 


I. You have successfully landed—flashing zeros. 


2. You have smashed into the lunar surface—flashing crash velocity. 


You must take care, however, not to burn more fuel than you have; for if you do 
you will free-fall to your doom! The final velocity shown will be your inpact 
velocity (generally rather high). You have 60 units of fuel initially. 


Equations: 


We don’t want to get too specific, because that would spoil the fun of the game; 
but rest assured that the program is solidly based on some old friends from 
Newtonian physics: 


l 
X = Xq + Vot +—at? V =v, + at v2 =v," + 2ax 
2 


where x, v, a, and t are distance, velocity, acceleration, and time. 
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Remarks: 
Only integer values for fuel burn are allowed. 


can be used to stop Moon Rocket Lander at any time. 


INPUT 
STEP INSTRUCTIONS DATA/UNITS KEYS 


Load side 1. 
Assume manual control. 











OUTPUT 
DATA/UNITS 


“V.ALT” 
“FUEL” 


“V.ALT” 

















“FUEL” 







ll 
few | 
oa 
4 [Gotostep sunt youtane | 
testing 218) rash fash 
ro ing impact velocity). 


another try. 







*If you miss the burn window and 







flameout, press (J for a new 


ongne sa 





| 
| 
| 
| 
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DIAGNOSTIC PROGRAM 


DIAGNOSTIC PROGRAM 


START 





This program can be used to test the calculator and diagnose calculator 
malfunctions. Simply insert the card and press EJ. After approximately two 
seconds, the calculator should pause displaying: 


57.0 


If the calculator does not pause with this number, there is a malfunction in 
executing and returning from a subroutine, finding Label 0, program storage, 
the display, the magnetic card, the PAUSE command or the card reader. 
After the pause, the calculator should continue to run about one-and-one-half 
minutes more and then print the three lines shown: 


-888.9-90 
-8.889-88 
-8.888888888-88 


This output indicates that printing and display formatting are working cor- 
rectly. If the calculator stops before displaying -8.888888888-88 , a code 
number corresponding to a function or operation malfunction will be displayed. 
For instance, if the calculator stopped with 36.0 in the display, an error in 
tangent or arctangent would be indicated. The sole exception is a failure in 
primary register 0. The calculator will stop execution of the program with the 


erroneous contents of Ry displayed. 


DIAGNOSTIC CODES 


Function or Operation or Register Indicated 




























STO i, RCL i, Ry, GTO 0, LBL 0, x=y, x Ay 0 
ISZ I, Ry 1 
R, 2 
R; 3 
R, 4 
R; 5 
Ry 6 
R; 7 
Rg 8 
Ry 9 
Rs 10 
Rs ll 





Rge 


=" 
NO 








(i i ot i 
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Remarks: 


' 
=) 


If this program runs correctly, it strongly suggests that the calculator iS Oper- 
ating correctly. However, the diagnosis is by no means complete or exhaus- 
tive. The diagnostic can be made to repetitively loop by changing step 224 
from ‘‘R/S’’ to “GTO A’’. This may aid in detection of intermittent failures. 
The program relies on the status of the flags to be correctly set by the card. Ifa 
flag error occurs, re-insert the diagnostic card and verify repeatability of 
failure. 


~ = a 


ERROR CODES 


y*, LAST x, 1/x 

Vx, x? 

LN, e* 

LOG, 10* 

—H.MS, H.MS>, RND 
<P eK 

TAN, TAN"! 

COS, COS"! 

DEG, SIN, SIN“! 

FLAG 2, test cleared 

FLAG 1, set; LBL9 

FLAG 2, set; LBL8 

FLAG 0, clear 

FLAG 3, test cleared 
FLAG 0, set by card; LBL7 
FLAG 3, set by card; LBL6 
FLAG 1, cleared by card 
FLAG 2, cleared by card 
x>0O, true; LBL4 

x<0O, false 

x=O, false 

x40, true; LBL3 
I-REGISTER 

xXy, true; LBLI 

x=y, false 

x>y, false 

ENTER?, RJ, RT, x=—y, STACK (X, Y, Z, T) 
Subroutine execution and return, CLREG, 




































R 


i 











D—R,R~D 
FRC, INT 


eae a ee ree. ie ae SS ees eee, ea 6. gem. FT zs =>, =  - - =: - x2 cane =. ....6.64f- =«.6©~—)6Dv.—W—)—lh ©) hl RN RR ER 
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P=S; LBLO 
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Function or Operation or Register Indicated 


Flag 3, off 
Flag 0, on 
Flag 1, on 
Flag 2, on 
Flag 3, on 





Remarks: 


If this program runs correctly, it strongly suggests that the calculator is operat- 
ing correctly. However, the diagnostic is by no means complete or exhaustive. 


All data storage registers are used. 


INPUT OUTPUT 
INSTRUCTIONS patajunits “EYS  patasunits 


Bo -7.7777777170-77 


See documentation for descrip- Lo 


tion of outputs. 
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PROGRAM LISTINGS* AND PROGRAVVING TECHNIQUES 


Program Page 

l. Moving Average ........ 0. ccc c eee eee ee eens L01-01 
Comparisons 

ET L02-01 
Decrement and Skip on Zero (DSZI) 
Loop in Combination with Indirect Recall (RCL1) 

S. Curve Fitting .... 0... 2. cece eee tenn n een aes L03-01 
Primary Exchange Secondary Registers 

4. Calendar Functions .......... 0.0 cece eee eee ee eee eens L04-01 
Multiple Storage In Registers 

5. Annuities and Compound Amounts ...........+.20+ eee ee L05-01 
Interchangeable Solutions 

Me Pilow Me 2... 2c ec ene eee beet eee ee ee eee eee eee ewe es L06-01 
Indirect GTO 

7. Triangle Solutions ......... 0... cece eee eee cee eens L07-01 
Variable Input 

®.° Vector Operations ......... 0. cece eee eee ee ene eee L08-01 
Flag Set, Clear and Test—-Command 
Clearing Flags 

9. Polynomial Evaluation .......... 00sec ee eee eee eee L09-01 
Flag Set, Clear and Test—Test 
Clearing Flags 

10. Matrix Operations ...... 0... cece eee eee eee ees L10-01 
Subroutines and Indirect Recalls 

11. Calculus and Roots of f(x) .......... 0c cee eee ee eee eee L11-01 
Iterative Test and Loop 

Be SORRHE COnVersiONS 2... cc eee eee eee beeen ena eees L12-01 

oe Mrithumetic Teacher 2.42.4 0s40csc000ee ete e eee ees ewe ans L13-01 
Pseudorandom Number Generator 

14, Moon Rocket Lander ........... 2. cece eee eee eee eens L14-01 

TT a ec ee L15-01 


*Keycodes for program steps may be found in Appendix E of your Owner’s Handbook. 
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Subroutine D of Moving Average computes the moving average when the {J 
key is pressed from the keyboard. 


1 - 


3 
Ges (0) 
RCL IE 
RCL JD | 
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Generally, the average is calculated based on the summation of input values, > 
(stored in Ro) and the requested number of units, n (stored in Rp) in the moving 
average. However, if less than n values have been input, the average must be 
calculated based on the current number of inputs (k). The value of k is stored in 
Rg. The flowchart for this calculation might look like this: 
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Recall sum 


Select k 


ee oe 


by nor k 
and display 
result 
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Subroutine D begins by recalling the sum from Ro, k from Rx and n from Rp. 
After these recalls the operational stack is as follows: 


Unknown value T 
Sum Z, 
k Y 
n xX 
The comparison step x S y (if x is less than or equal to y) causes program 
execution to skip the next step when the conditions of the comparison are not 
met. If the conditions of the comparison are met, the following step is executed. 
This is the ‘‘DO if TRUE”’ rule. For instance, ifk = y = 15 andn = x = 6 
the comparison would be true or satisified (since x is less than y) and the next 
step, EESg (x exchange y), would be executed. If k were less than 6, say 4, the 


command would be skipped. The stack contents for both cases are shown 
below: 


BEFORE COMPARISON 


Unknown value T Unknown value ib 

Sum Z Sum Z, 

15 Y 4 Y 

6 x 6 xX 

AFTER COMPARISON AND NEXT STEP 

Unknown value T Unknown value T : 
Sum Z Sum Z 
6 T 4 Y 
15 switched x 6 not switched Xx 


The next step rolls the stack down removing the unwanted value from the 
X-register. 


15 (Unwanted value) T 6 (Unwanted value) T 
Unknown value fd Unknown value Z 
Sum Y Sum Y 
6 xX 4 Xx 


The last step divides the sum by the value in the X-register to complete the 
calculation. : 














Moving Average 










Clear registers. 





If print mode is off pause 
for display of n. 













If 1 <n < 22 continue, 
otherwise go to label 1. 











Store nin Rp and 
(n + n/100) in Ry. 









Print/pause mode toggle. 
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Increment k by one. Print H&E G 
space, k, and input if flag O AGS CFE 
is set. RE4 RTN 
@8S wLBLe 
i feted SPC Output values in newest 
ee? A to oldest order. 
BES eLBLZ 
A689 8 RCLG 
H9@  Xe¥e 
asi RTN 
q 









Remove oldest value from 
sum and add input. 








If n<k,GTO O and 
calculate average. 









If lis not zero, GTO 5 for 






eTO2 
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bi tie | Yate. 





lia rie ! 


Re 









7s 
4 - 


REGISTERS 


Pe a a ae ae 
z used used used ed ed 
So S1 S2 S3 S4 S5 S6 S7 S8 Sg 
















rnrRrtet aS eB 


3 


hath wT 


nm mninonintttmhmh 


ry 





LO1-04 





SET STATUS 


LABELS 











LO2-01 


DECREMENT AND SKIP ON ZERO (DSZ!) LOOP 
IN COMBINATION WITH INDIRECT RECALL (RCLIi) 


One of the most powerful features of your calculator is its ability to do indirect 
recalls. That is, recall a register which is specified by a value stored in the I 
register. For instance, if the contents of I were 3.0 and an indirect recall (RCLi) 
command were encountered, the contents of R; would be recalled. When the 
content of I is changed, the action of the RCLi is also changed. Because of this 
relationship, it is possible to access all 26 data storage registers with only one 
RCLi command. 


DSZI (Decrement and Skip on Zero) was designed to help take full advantage 
of RCLi and other indirect capabilities. A DSZI command causes 1.00 to be 
subtracted from the contents of I. After the subtraction, the content of I is 
automatically compared to zero. If the integer part of the value is zero, the 
calculator skips the step following the DSZI command. If the integer part is 
non-zero, the following step is executed. This automatic test capability makes 
DSZI a valuable looping tool. 


Steps 102-130 of Tabulator illustrate a typical use of DSZI and RCLi. The task 
is to recall the values of the row totals, in order, and output them. Below are the 
flowchart and the commented code which performs the task. 


spines CF 1 
= LBL 6 
SPACE 
RCL I 
FRAC Store position 
EEX of first register 
ae . 4 location in I 

% 





Initialize, store 
first register 
location in I 





X=! 
eipcegtsecnsyeites teeseseees PYGD O 
ceeccccccccccs LBL 4 
pve IC | Indirect recall 
vnseennee 7 FA? } Compute % of grand 
cae : GSBE total if flag is set 
: PRINT X Output 
ices ¢ | OR Eliminate value from stack 
cman OL | Subtract 1.0 and test 
as GTO 4 Loop again if Iz0 









Is : pr SPACE 

integer part ~..3 } RCLO 
of 1=0O Fae 

7) : GSBE Complete output. 
yes : PRINT X 

Continue with casteeeaacuwecesane ee 
program execution py 
| CF1 
Feahis RTN 


Fi 





rRe eA 
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NOTES 





PPO PM 








Tabulator 


Clear flag 2 and registers. 


If the value input for number 
of rows is not in the range of 
1 to 24, reject the value. 


Store # registers + # 
registers/100 in I. 


Add input to row. 
Add input to GT. 


Print or display column 
total and stop. 


Clear stack except for last 


If column just changed 


Restore counter. Subtract 
display from totals. 


Print space to indicate 


Reset index to previous 
column, last value. 


Subtract display from 


Print space to indicate 


Toggle print/pause flag. 


Set index to begin at first 
row total. 
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. Recall and output values. If 
flag 1 is set, convert values 
) to % before output. 
Output grand total or % of 
. grand total if flag 1 is set. 
: Output % of total values 
z using LBL C. 
= : Compute % of total for any 
_ input value. 


FLAGS 


FLAGS __TRIG 
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PRIMARY EXCHANGE SECONDARY REGISTERS 


The data storage of your calculator is comprised of 26 registers. Sixteen of 
these registers are directly accessible at all times through store and recall com- 
mands. The remaining 10 secondary registers Rso—Rsg are not directly address- 
able but may be exchanged with primary registers Ro—Rg at any time. The 
command can be used to do this. Figure 1 represents the action of (Ps). 
After execution of the command, the value originally stored in Rgo is found in 
Ry, and the value originally in Ro is in Rgo. A similar exchange would occur 
between R,-Rgy and Rs;—Rsg, respectively. 


Primary data registers 

LL d 

ReL 

Rof_ 

Rel 

Ref 

Raf Secondary data registers 
Rol) Seed 
R [J = [| __'dRss 
a Se 0 
Ge... fh eee 
NS (ee —eeeneo 2 | 
Re, ee 
Ry ee 
Rl.) ee Re 
Re eee 
By), ee 


Figure 1. 





In Curve Fitting, the command is used to automatically accumulate the 
necessary sums in the registers indicated below: 


> ee Rey 
>x? ——————> Rs; 
Ly ————> Rse 
Ly? —————> _ Rs; 
<xy —————>_ Rg 


“1 ——> Rgg 





a a a 
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Before starting to accumulate the sums, registers Rs4—Rgg must be cleared. 
Since the clear registers command only operates on the primary registers, a 
(PS) command is necessary. The code from Curve Fitting which prepares the 
secondary registers for summation is shown below: 


(PxS] Exchange primary and secondary registers. 
(CLREG) Clear primary registers. 


PS Return cleared registers to secondary status, ready to 
accumulate sums. 


Note that this sequence has no effect on the original, primary registers Ro-Rg. 
They still contain exactly what they contained before the sequence. This allows 
Ry-Rzy to be used for user storage during execution of Curve Fitting. 


After the sums are accumulated, they must be accessed to calculate the regres- 
sion coefficients a, b and r?. However, since the sums are in the secondary 
registers, they are not directly accessible by the store and recall commands. 
This necessitates use of again. Label C (steps 68-113) of Curve Fitting 
performs the calculation. is found at the beginning and the end of the 
Label C routine. The first allows the values to be accessed directly. The 
second returns the registers to their original configuration. 


ee OS eee iT i PO CO iE, sd 


Exchanges primary and secondary registers for access by 
and Gy. 

PxS Exchanges primary and secondary registers returning 

RTN calculator to original status. 


: 
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Curve Fitting 


Toggle print/pause mode 


Clear flags and registers for 
linear regression. 


Call LBL b, then set 
exponential flag. 


Call LBL b, then set 
logarithmic flag. 


Call LBL d, then set flag 
for power curve fit. 


Set inputs in stack posi- 
tioned for possible deletion. 





Print delete indicator if 
flag is set. 


Compute b. 


Compute r2, 


Compute a. 
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ils RTN 16% Power exp calc. 
114 wLlBLe Position coefficients in stack ir€ For power GTO 1 
115 STOE for use by projection 17] 
+ me routines. - 
118 RCLE 174 
il If flag 1 is set, power or 17S 
“ GIUL exp projection. ive 
121 Fa? 177 
122 LN 1ré 
123 X 17s 
124 + Linear or logarithmic 186 
i 7, projection. a 
127 RTN 183 
128 -«LBLi 

129 Fae 

136 8=68T02 

131 x 

132 e* 

{33 x 

134 F2? 

135 é€7T09 





139 7" 

148 x 

141 F2? 

142 €TOs 

143 RTN 

144 «LBL? . 

i45 SPC Print —1 indicator. 
146 J : 

147 CHS 

146 = PRTSX 

149 SF2 

15@ Rd 

151 RTN 

3 ai Position coefficients in stack 
154 RCLB for use by projection 
1s. 1“X routine. 

156 = RCLA 

157 RCLE 

158 Xx2y 

159 F1? 

16@ 701 

161 - 

162 x 

163 Fa? 

164 e™ 

165 F2? 

166 G&TO9 

167 RTN 

168 «#*LBLI 


CC C—Ci‘COCOLABELS FLAGS SET STATUS 

it yi tt) > TRIG___DISP 
b c 
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MULTIPLE STORAGE IN REGISTERS 


In Calendar Functions the date is input in mm.ddyyyy format. This allows 
three pieces of information (the day, the month, and the year) to be carried in 
one register. In Calendar Functions this provides a convenient means of dis- 
playing the date. In other programs a similar technique could be used to store 
more than 26 values in the 26 addressable registers. 


When multiple storage techniques are used, two types of code are usually 
required. The first type breaks a combined number into its individual com- 
ponents. The second type assembles the individual components into a single 
number. 


Steps 83 through 97 of Calendar Functions break the date into its individual 
components. 


PROGRAM STEPS X REGISTER CONTENT 
ENTT mm.ddyyyy (combined form) 
INT mm.000000 
STO7 mm.000000 (months) 

— -ddyyyy 

EEX 

2 100.000000 

Xx dd.yyyy0O 

ENT‘ dd.yyyy00 

INT dd.000000 

STO8 dd.000000 (days) 
— -yyyyO0 

EEX 

4 10000.000000 

X yyyy.000000 

STO9 yyyy.000000_ (years) 


Steps 54 through 78 of Calendar Functions assemble the three values into one 
number for display. However, other operations are being performed which 
obscure the technique being used. Below is a sample program which could be 
used to build a date in mm.ddyyyy format if m were stored in R;, din Rg, and 
y in Rg. 
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PROGRAM STEPS 


RCL7 
RCL8 
EEX 
2 
+ 
RCL9 
EEX 
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X REGISTER CONTENTS 


mm.000000 
dd.000000 


100.000000 
0.dd0000 
mm.dd0000 
yyyy.000000 


1000000.000000 


0.00yyyy 
mm.ddyyyy 
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Mach onto: 


Calendar Functions 


Calculate A days and put 
control 3 in display. 


Calculate A days and put 
control 4 in display. 


Store constants. 


Store A days according to 
control code. 


Calculate y’. 


Calculate m’. 


Build (m’ - 1). dd part of 
display. 


Correct m’ - 1 and y’ tom 


Finish building mm.ddyyyy 
result and display final 
answer. 


Break date input into the 
individual components of 
mm, dd, yyyy. 
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126 
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122 


123 
124 
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126 
127 
126 
129 
138 
131 
132 
133 
134 
135 
136 


138 


143 


LABELS 
at | a a 
fae | 


INT 


me 
om ey Mp oy 


ey a ea ee Se 


RCLE 


Compute Julian day number 
for output. 


& 


Ate. fag Pra be 


(4 


If input to this routine has 
absolute value 1 or greater: 
1 y=yt1 

m=m+t12 
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(+ for plus input) 


#LBLC 
DSP@ 
STOC 

F3? 
RTN 
RCL4 
RCLZ 


STaCc 
RTN 
a#LBLU 
F3? 
€T04 
GSBC 
DSF 1 
#LBL3 
ra 


Convert to A weeks.days 
- format. 

INT 
LSTX 
FRC 
7 

x 

+ 
RTN 
4aLBL4 
DSP@ 
ENTT 
INT 


Convert A weeks.days to 
days and store. 


vy 


P «AWks. Days | DT > DOW 





FLAGS 
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Change day number to 
modulo 7 number. 


SET STATUS 
TRIG 
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INTERCHANGEABLE SOLUTIONS 


In programs like Annuities and Compound Amounts, it is necessary to be able to 
calculate any value given the other values. While there are many ways to do 
these interchangeable solutions, two methods are designed into your calculator. 
The method used in Annuities and Compound Amounts takes advantage of the 
STO A through STO E commands. The other method, used in Calendar 
Functions, takes advantage of the keyboard sensing flag (flag 3). 





An interchangeable solution requires a method for storage and calculation. 
It is also desirable to associate inputs and outputs with the mnemonics on the 
magnetic cards. The STO A through STO E commands accommodate the 
storage of up to five values in the A through E registers and associate these 
values with the user definable keys which can be used to initiate calculation. 
Below is a diagram representing these relationships. 





A] B | D E | 
LBLA LBLB LBLC LBLD LBLE 
C C C C C 
A A A A A 
L. L L L L 
C C C C C 
U U U U U 
L L L L L 
A A A A A 
+ T T T T 
E E E E E 
a b Cc d e 


STOA STOB STOC STOD STOE 
RIN RIN RIN RTN~ RTN 


To store a, press GY; to calculate a, press GJ. Note that after any value is 
calculated, it is automatically stored just before the RTN command stops 
execution. This eliminates the need to reinput calculated values in subsequent 
calculations. 


gg 
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The keyboard sensing flag allows up to ten variables to be interchangeably 
input. It also allows more versatility in storage register selection and allows 
input processing of data. However, it is slightly more complicated, requires 
extra steps and may seem mysterious to the uninitiated program user. The 
diagram below shows the relationships between the magnetic card and the 
keyboard sensing code. 





AL 6 C) G 
\BLfA LBLA LBLB LBLC LBLD LBLE 
STOO STO1 STO2 STO3 STO4 STO5 
Fa? 3? F383? £F3?  F3? ~~ F3? 

RTN  RTN RTN RTN RIN RTN 


C C C C C C 
A A A A A A 
L L L L L L 
C C C C C C 
U U U U U U 
L L L L L L 
A A A A A A 
T a 1 T T T 
E E E E E E 
f a b Cc d e 


STOO STO1 STO2 STO3 STO4 STO5 
AIN RTN RIN RIN’ RIN~ RIN 


To input the value a, key it in and press €§. To calculate a, press GJ. Pressing 
QJ for both input and output works because Flag 3 is set when the digit entry 
keys are pressed. When Flag 3 is set, the value is stored and execution stops 
at the first RTN. If the flag is not set (no digit keys were pressed), the program 
skips the first return and continues through the calculate portion of the program. 
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Annuities and Compound Amounts 





(+i)inRs. 
Store (1+ i) in R,. 
Calculate (1 + i)~" and 

Sa Naas fete ee Ss ad store in Rg. 
Solve for n and store it in me)6=—C<SSTOEGE s—“sSCS eee ee ee 


Ra. 








Store dummy 0 for n. 











Calculate [1 - (1+ i)7"] 
and store in Ra. 







Calculate + (PMT/i). Use 
— if FV flag is set. 
Store in R3. 








Calculate 
Se ys ee ee re c +PMT 
‘. ; 
Solve for PMT and store it Start by clearing PMT, PV, 
FV (BAL) registers and 
annuity due flag. 


















= 4) Re. 
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Annuity due flag toggle. 


Solve for FV (or BAL) and 
storeinRe. fo Bee REN lh PRR RRR RHR RH KK KK 





Store address of Rg in Ry 
for indirect access. 






if PMT =0, GTO n, i, PV, 
soi yes te FV solution. 
Set annuity due mode off : 















Convert i to decimal and 
store in Rg. 





Calculate (i + 1). 






PV guess for i. 
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FV guess for i numerator: 
2(FV - nPMT) 


A Oy OR te ey be Lo 


and denominator: 
(n - 1)? PMT + FV 


ee ee 


Dm md ed edd 


If guess is less than -0.9 use 
—0.9 for guess. 


Calculate f' (i). 
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Subtract f(i)/f’ (i) from 
current i value. 


If value is not = to zero, 
loop again. 


Compute i for n, i, PV, FV 
problem. 


Convert i to % and add to 
content of Rg. 





Output n, i, PMT, PV and 
FV or BAL. 


SET STATUS 


FLAGS TRIG DISP 
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INDIRECT GTO 


The GTO function is used to cause program execution to transfer from the 
location of the GTO to the label specified. The label may be specified in one 
of two ways: 


1. Asa direct branch such as GTO 1, GTO A, GTO f C, etc. 


2. As an indirect branch GTOi which causes execution to transfer 
to the label specified by the content of the I register. 


In Follow Me the content of the I register is used to specify the operation to be 
performed. The operation codes are: 


CODE OPERATION 












I/O HALT 
Constant 





The first time a problem is done using Follow Me these codes are stored 
starting in Rp and ending in R,. The calculator accesses these codes in sub- 
sequent calculations and performs the operations indicated by them. 


The GTOi instruction at step 083 actually selects the next operation. The RCLi 
and X<>I commands directly above the GTOi place the operation code in the 
I register. The GTOi command transfers control to one of seven labels corre- 
sponding to the operation code stored in the I register. For instance, if 3 is 
stored in I, the GTOi command will transfer control to LBL3 and the multiply 
at step 108 will be performed. 
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NOTES 
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Follow Me 


Clear registers and set index 
at 24 to begin sequence. 


Perform addition and put 
addition code of 1 in display 
register. 


Perform subtraction and put 
2 in display, then transfer 
to LBL O. 


Perform multiplication and 
put 3 in display. 


Perform division and put 4 
in the display. 


Store function code and 
return operation result. 


Perform %, store display 
register value, and put 5 
code in display. 


1/0 halt code of 6 put in 
display after storing display 
register value. 


Constant code of 7 put in 
display after display value is 


Flash 24 indicating that too 
many operations have been 
attempted. 


recall constant value. 


If lis non zero after dec 
store cd. 


Store code and return dis- 
play to proper status. 


Store 24 in I to reset count- 
er and store zero code in 

Ro for auto reset at end of | 
sequence. 


Store display value, access 
code after dec, put code in 
I, transfer to LBL corre- 
sponding to code. 


Reset to start new sequence 
by setting I to 24 and re- 
turning output to display. 


Perform addition and re- 
turn to LBL E for next 
instruction. 


Perform subtraction. 


S8 s9 
used used 
| 
step count 
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i115 ROLE 
114 
115 GTOE 
116 #LBL5 Perform %. 
117 x1 
118 CLX 
177 06 ROLLE 
126 n 
121 GTOE 
122 #LBLé 
123 ol 
124 CLX 
125 RCLE 
126 RTN 
i ae: Recall constant. 
129 CLX 
136 =6©RCLE 
131 DSZI 
132 =RCLa 
133 GTOE 
134 R/S 


LABELS FLAGS SET STATUS 
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VARIABLE INPUT 


In many instances, it is desirable to input more than one value per user definable 
key. In Triangle Solutions, the lengths of all three sides of a triangle are input 
with one press of €§. Before €§ is pressed the values of S,, S2, and S3; must be 
keyed into the operational stack. The sequence to do this 1s: 


S, @tiaar) S. GnEGY S; 


After this sequence is completed, the operational stack contains the values in » 


the following positions: 


T: Unknown value 
Z: S$, 
Yo ‘Ss 
X: Ss 


The X, or display register, shows Ss. 


To operate successfully, Triangle Solutions must store S, in Rg, Sz in Rg and 
S; in Rp. Since S3 is in the X-register, it can be stored in Rp with a D | 
command (step 002). The value of S, must now be moved to the X-register 
so that they can be stored. A GJ function (step 003) 1s used for this purpose. 
It moves the Y value to X, the Z value to Y, the T value to Z and the X value 
to T. After the GJ, © is performed placing S, in Rg. The operational stack 
is left as follows: 


T: Ss 
Z: Unknown value 
¥: 3; 
X: Sp 


Both S, and S, are stored in the correct registers. After GJ and (9], Sy is 
correctly stored. The final stack contents are as follows: 


S2 
S3 
Unknown value 
Si 


ihe 


a — nronmnninaitirmtmEHeermeHeeBHeBEemmeeBeRBRene SB 


Ye 





mm ——-— - ee -— = 


uaa aaa OO Oe ie UW eee ae ae Ou OW OY OW OW Ok 





The complete input sequence 1s: 


LBL A 

STO D (store S3) 
RY 

STO B (store S,) 
Rl 

STO 9 (store S,) 


L07-02 


Up to four values may be input per user definable key using this type of 


technique. 
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Triangle Solutions 


Store lengths of sides S3, GSB third angle 
Y = Sysin Ag. 


X = S;cos Ag. 


GSB third angle routine. 





Set stack for Az, S1, Ay 
solution. 


Store Sz, Ay, and S;. 


oe oe ee ee 


See eee eee er rE rr «§ ——————  —<.<§«|§ —=— —————<—=<$§$ sh = =-§§ — t+ —! <<: cues: we- umec=<«o<2#- _—<_ ss “a «s//__ 
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— es 









(| | a | | 


mmm cm, 








CG Se Se Se es Ses ee Se Se Se) ee) A A) A) A ee) a) a) a 


= 


113 RCLB 169 
114 x 17@ 
115 RCL9 irl 
116é 2 Ire 
if SIN~ 172 
118 S ——_— || ree 174 
119 RCLC fo 
126 ("| i [reaper mers Ife 
ae i. Recall A3,S,, and A, and iv? 
12 RCL 

124 RCLA 

Ize CSBB i Fe 

126 -RCLS Stop if this is the only 

+e in solution. 

120 6TaS 

138 RCLE Find secondary angle for 

- rote alternate solution. 

133 cas- 

134 SHOE 0 cee et Se ea 

go RCLC 

136 GSB6  — ii FL 

2 a Recall A3, S,, and A, and 

139 RCL 

148 RCLA 

141 CTO si 

3 — Third angle = 

ae cos cos"! [-cos (A + B)] 

145 CHS 

146 cos: 

147 RTN 

146 eLBLI fe 

a Print values starting with S,. 

151 RCL3 

15z PRT 

133 RCLA 

154 PRTX 

13% SPC 

156 RCLB 

or PRTS 

156 RCLC 

159 PRTX 

168 SPC 

161 RCLGO 

162 PRTX 

163 RCLE 

164 PRTX 

165 SPO —sSY 

= ce Calculate and print area = 

a : (S, Ss sin As /2. 


A 

S;,S2,S3 F ha Sis Aa MS. Ais Be M6) Ay, Ss 
222 2 2 
a 


9 3rd angle 
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FLAG SET, CLEAR AND TEST—COMMAND 
CLEARING FLAGS 


Review of the input values for Vector Operations is an option available to the 
user. When the program is loaded, the non-review Status is automatically set. 
The user can change this status by pressing —) €. Each time the!) EJ keys are 
pressed, the status is changed and 1.00 or 0.00 is displayed to indicate whether 
or not the input values will be reviewed. The 1.00 indicates review and the 0.00 
indicates no review. 


Flag O and flag 1 are command clearing flags. That is, once they are set they 
remain set until a clear flag command is encountered. Testing them has no 
effect on their on/off status. 


Flag O is used to control the review of the input values in Vector Operations. 
Lines 064, 090 and 112 contain PRST (print stack).* Preceding each of these 
statements is FO? (test flag 0). If flag O is set the PRST commands will be 
executed, reviewing the input values. If flag 0 is not on, the PRST commands 
are skipped. Below is the code used to change the flag status. 


If flag 0 is off, this code sets flag O on and displays 1.00. If flag O is on, this 
code turns flag O off and displays 0.00. 








LBL b 
FO? 
GTO O 
"aie. = 
RTN 
LBL O 


* 


Clear flag O and CFO 
display O | O 


' 


Gu) RTN 
cul 


*The HP-67 interprets PRST as pause stack. The values contained in the T, Z, 
Y, and X registers will be displayed for approximately 3 seconds each. The 
decimal point will flash, indicating program execution will resume 
automatically. 
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661 
a@z 
643 
684 
BES 
BeE 
aay 
8GE 
685 
A14 
Hild 
812 
612 
614 
B15 
816 
B17 
81E 
B19 
82@ 
821 
a22 
a2e 


833 


838 


Vector Operations 


Toggle two and three di- 
mensional modes. 


Toggle print/pause mode. 


Store magnitude and input 


Store magnitude and input 


Storage for vector 1. 


Storage for vector 2. 


If 3D mode is set, skip 7/2 
substitution for Z register 


content. 


Convert S>C. 


If 2D,set content of Z 
register to zero. 


Convert C>S. 
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a 16S 
14 oma Convert negative angles to 176 
+ oun positive angles 0° - 360°. we 
ii? C08” 173 
Hie ’ OG RT Wise et es ee 
118 =6L BTN 175 
a ’ ie ps Take dot product. 
alae ee a ee C r Fy 
+ yor Add Vi and V2 and con- 178 RCLE 
: 179 x 

vert back to spherical = ; 
os was coordinates. 
ive ROLD 
iv? ROLA 
1b , 
ive ROLE 
it@ =RCLY 
i + 
Ite SF2 
a3 GSB6 
134 = PRST 
eS ef) 
1 sor Take cross product. Compute angle between 





vectors. 





138 






Convert back to spherical. 


168 R 
FLAGS SET STATUS 
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FLAG SET, CLEAR AND TEST-TEST CLEARING FLAG 


Flag 2 and flag 3* are test clearing flags. Each time they are tested, they are 


automatically cleared. This makes them especially useful in many program- 
ming situations. 


In Polynomial Evaluation, flag 2 is used twice. At step 62 it is used to decide 
whether to add or subtract; and at step 145, it is used to determine whether a 
result should be positive or negative. The following discussion details the use in 
the latter case. 


Label | calculates the cube root of a number. This would be very simple if y* 
were defined for the case where y is negative and x is a non-integer. However, 
if we tried to find the cube root of —8 (which is —2) directly, we would obtain an 
error message. The following flow chart and code yield the desired result: 


Flow chart Code X register X register 
(Positive 8) (Negative 8) 
LBL 1 8 -8 
x<O 8 -8 





Set bettas 2 2 SF2 8 -8 


Take ie 
3 3 3 
Calculate 1/x 0.333... 0.333... 
root of value y* 2 2 






input negative F2? 2 2 
yes 
Change sign 
of output | CHS 2 = 
RTN 2 -2 


*When using flag 3, you must be aware that it is set whenever the numeric keys 
are pressed. 
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Polynomial Evaluation 


Store zero for degree,to 
initialize. 


Store ag and set degree 
indicator (= degree + 1) to = cf Compute x, (the root of 
largest absolute value). 


Store a; and set indicator to 


Store az and set indicator 


Store a3 and set indicator 


Sort to find and retain 
largest indicator. 


Return equation to orig- 
inal form. 


Start 3? degree solution by 
computing Q. 


Put degree code in | for 
control. 


Divide all coef. by coef. of 
highest deg. 


Compute R. 
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Output x3 and begin 


os 


synthetic division. 


~~ 
wh Td Oy 


ee? le ae ee es ea ie | 
MS 'o Oo 7.) Oo On me By hoo GR ho 


Compute x3 using 


Cn ee 


on co ~ 


a2 
Xs = S + T = 3 
aa Set up for polynomial 


evaluation. 


Cube root of a number. 


Compute x3 using 


a 
x = 2/-Q_ cos(M) - 3 
a 


Where 


Me = 00s"! (R/V-O3 ) 


LABELS FLAGS SET STATUS 


TRIG 
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SUBROUTINES AND INDIRECT RECALLS 


LBL a (lines 22 through 49) of Matrix Operations calculates the determinant of 
the 3 X 3 matrix stored in registers R, through Rg. 


R, Ry Rs 
Ry, Rs Re = (RsRy — ReRg) Ri — (RaRo — ReRz) Ro + (RaRg — R5R7) Rs 
Rz Rg Rg 


= —(R,gRgR, + RuR oR. +R;5R7R3) + RgRgRy + RiRoRs + ReR7Re 


The following keystroke procedure will perform the calculation: 


MoOMEMOBa MFC G80 & 
RCL MGA RCL BESS Bh + Bi cHs Bi Rc. BE Rc GNM ecu COE x Bx + Beck 
RCL BED ecu BE Bx + Bi ece Bea ect Bea ect IG = Bx + 


There are two patterns in the above procedure which can be exploited to reduce 
the number of program steps necessary for solution: 


FE; appears repeatedly. 
2. The values recalled immediately before E3 €3., are recalled from 


consecutive registers (note underlined RCL instructions in keystrokes 
above). 


A subroutine can be used to take advantage of item one, while indirect recalls 
in combination with the ISZ command can be used to recall values consecutive- 
ly. Let’s examine the code that does this. 
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a he 


Here is what happens on the first, second and 
sixth time the subroutine is executed. 


444 i 1 = l=2 I=6 

645 FlL1—-RCLI1 RCL 2 RCL 6 

b4¢ x» — »>R, XR, Ry X Rz R7z X Rg 

a4; x — eR, X Rg XR, Ry XRyg XRq Ro X Rz X Re 
a4é& + — +0+R, XR, XR, Subtotal Total 

449 F:Tt¥——> Return to call Return to call Stop 


Each time the GSB 7 command is encountered, the calculator goes to LBL 7, 
executes the ISZ command, which adds one to the contents of register I, and 
recalls the contents of the register specified by the contents of register I (Ry 
through R,). After this, the X X + is done and execution continues at the step 
following the GSB 7 call. 
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Matrix Operations 



















































Set 0 in display for indi- ROL” 







RLBLo 












































& rect store. ASE GSES 
gee pe Se asc 8=6STOR 
fad «a Ble Set 3 in display for indi- 66€ CLS 
BEE Z rect store. Tap} FCLE 

| fe e708  £|------------ fez  RCL4 
| @@7 wLEL? Set 6 in display for indi- Ez ® 

AGe 6 rect store. aed RCL1 
aeo)60COCTO5 wt—~=CiSiW we He @€5 RCLE 







aia x#LBLo Set 19 in display for indi- Méc CSEZ 
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fi: 3 rect store. Re> STOE 

Ble GS Jone bes CLS 

1220 WLBLSE 66S RCLE : 
6i4 STOI  £J------------ are = RCL 

015 EGSBé Store three input values in ri x 

Ble GSEE proper registers according 2 PCL pe 
Qi? -«eLBLé rz PCLE 

ate Rt @74 SBR | 
A1g 1S2l ve 6s S FGI 

oz@  STOi  £|J------------ are CLS me 
B21 RTN Calculate determinant. er? = RCLI 

Q22 #LBLo a@r7e = RCLS 
Pane & arG x 

424 STOI e8@ = =RCLE 

625 = RCLE BE] RCL4 

62é = PCLE B62 ESBS 

B27 GSB” H&? cTae@ 

ze = =RCL4 as4 CL? 

B29 = =RCLS 685 RCLS 

e360 8=6G SEY ase = RCL 

B31 RCLS hE? x 

632 RCL? ase = RCLE 

B23 GSBF peo = RCL 

834 CHS 694 © GSB 

O35 = RCLS 891 STG! 

B3é = RTLE a9? CLE 

@27 8 6GSBr A93 = RCL 

63& = RCLI 94 RCL6 

839 = =6RCLS aor x 

f4@ = GSB? A596 = PCLE 

b4i 0 RCLE a97 = RCL 

A420 RELY o9¢  GSB2Z 

A42  #LBLe aso) STQS 

844 Sei 148 CLs 

645 RCLi 16! RPCLS 

B46 ‘ 182 RCL9 

847 x 182 a 

648 Ph cc eees cident Sepeeen oe 104 RCL 

and ey Caletiats reciprocal of sere 

a5! GSBa determinant. 187 TO? 

O52 PPR We es bee 1ee fix 

@5Z = RCL 1@% = RCLE 

654 RCL 11@ RCL 

@S5 XN * 
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169 wlBL: 
176 CPC First value from 
ied } multiplication. 
{ve STO] 
#29 OBS cst Sa i as ee See se 
174 STOL Second value from 
; re a multiplication. 
rt wid 
177 €SB! 
178 STORE —es—<i 
ote ae ee ae ive — Third value from 
Store inverse values in ee pe multiplication. 
er registers. es i 
oe ne ee ste =——“C—~iW ee 
1Q7 
- oa Put values in stack for 
185 RCLE display. 
186 = =RCLA 
187 RUN er eet 
- aLBL : Multiplication. 
ee ee 196 FCLA 
191 6SB4 
ee ee 192 RCLE 
182 6SB4 
194 RCL 
ee 195 8 §=6©6SB4 
196 PRT 
197 RTN Pe 
19€ #LlLBL4 





Multiplication subroutine. 


199 =RCLG 


+ 
2@2 «SZ! 
2az«ISZI 
264 = «ISZI 
25 = RTN 
RS 


























Output registers R, through 
Ro. 


Output registers Ra 
through Rc. 


Pas.tz.0 [Pou bobs Cor,cr,c;  [Pdivdo.ds [FPrint =f? etaGs —_ TRIG DISP 
a 

Pprint fh mutt print |S inv [mut 
Feode ——fPinput eet Easel 
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ITERATIVE TEST AND LOOP 


Some equations cannot be solved explicitly. That is, it is impossible to separate 
a particular variable from the rest of the equation. Solution of this type of 
equation requires a repetitive technique. In general, such techniques are com- 
posed of three basic operations. 


1. An initial guess is made. 
2. This guess is refined. 


3. The refined guess is tested for accuracy. If the accuracy is 
satisfactory, the result is displayed. If the result is not satisfactory, 
the refinement process is repeated. 


In flow chart form, the process might look like this: 


Make 
guess 


CREB ERT RAT tense 


Refine 
guess 











Is 
refinement 
accurate enough 


no 


In Calculus And Roots Of f(x), LBL E (steps 83 through 112) performs a 
general interative solution for user-specified functions. The initial guess 
supplied by the user is refined using the secant method. The secant method 
evaluates the function f(x) at two points and generates a third refined point. 
Graphically, this can be represented by the sketch below: 
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By defining a straight line using x, and x2, x3 can be found. Subsequently, 
x» and x, can be used to generate x, etc. 


The equation defining the secant method is as follows: 


=xXx. — {(x;) — O& TX) 
“~ f(x) — f(xi-1) 


It is evaluated repeatedly by steps 88 through 103. Each time these steps are 
repeated, the value of x is refined. 


Steps 104 through 110 (excluding steps 105 and 106) test to determine whether 
the guess has been refined to the desired accuracy. If another loop is required, 
control is transferred to LBL 6. Ifthe value is sufficiently accurate, the program 
stops, displaying the result at step 112. 


The display setting, in combination with the RND function, is used to deter- 


mine the accuracy of the result. If the amount of change in x; divided by xj4, 
rounds to zero, the condition for convergence is met and x;4, 1s displayed 
as the answer. If the rounded value is not zero, another iteration is required. 
Mor instance, if x; = 10, the change in x, is 0.1 and the display is set at two 
decimal places, the test value would be calculated as follows: 


Test value = RND(O.1/(10 —0.1)) =RND(0.01010101) 
> 0.01 


Since the value is not zero, another loop is required. If, on the next loop, the 
refinement were 0.01, and x, were 9.9, the test value would be calculated as 
follows: 


Test value = RND(0.01/(9.9 —0.01)) =RND (0.001011122) 
= 0.00 


Since the value is zero, x;,, would be displayed as the result (xj, = 9.89). 
Note that, if the display had been set to three decimal places, another loop 
would be required since the RND function is display dependent. 








aLELA 
STGI 
RTN 
alLBLle 
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RTW 


Pause toggle. 


Choose default %A or use 
0.01%? 


If x=0 use %A rather than 
% of x as Ax. 


f(x — Ax/2). 


Put number of intervals 


Return function number 


to land nto Reg. 


Decrement n and save 
function in display. 


Display result of 
integration. 





Use numerical differential 
to generate x; from user 


Secant method calculates 
correction for x value 
and sets values for next 
loop. 


Pause and display root if 
flag set? 
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Graphical evaluation 

subroutine. 

f(x) = tan(x) — Inv(x) - x 
V1—-k? sin? 0 


r——r—<C~SA'BELS—“‘NUCN CFLAGS SET STATUS 


7 
PoP Pe 
a (a 
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English—SI Conversions (Metric Conversions) 


Set millimeter inch flag. 


Feet-meter conversion. 


hy 
To tu Gu ha Lo CA om get 


iat 
> 


Ho Th 


yo 


Gallon-liter conversion. 


& 
ba 
4 
1 
1 


Pound force-newton 
conversion. 


Pound mass-kilogram 
conversion. 
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I oa A13 6 
14 x 
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O19 #LBLb ‘s conversion. 
; of bed SFe British thermal unit to joule 4 
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a2? i conversion. ; 
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&Zs J y 
| 26 9 
B27 if & 
' “ 428 5 7 
G29 a 2? 
O36 & os 
Ag a ey 
o 032 Z x 
33 Fe? RTN 
34 17x Re 
35 xt 
= 036 A 
G37 RIN 
@38 #*LBbLle 
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H41 6 
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PSEUDORANDOM NUMBER GENERATOR 


Arithmetic Teacher incorporates a pseudorandom number generator. This 
generator supplies a sequence of numbers between zero and one which are 
converted into the problems displayed by the program. 


The term ‘‘Pseudorandom’’ implies that the sequence of numbers is predict- 
able from the algorithm and the initial value or seed used for the generator. A 
truly random device, such as a fair roulette wheel, is totally unpredictable. 
However, pseudorandom generators can be used to model random events pro- 
vided they yield uniformly distributed numbers (i.e., as many values fall 
between 0.00 and 0.10 as fall between 0.10 and 0.20 etc.) and they do not 
repeat the same sequence of values during the simulation. 


The pseudorandom number generator incorporated in Arithmetic Teacher is 
very simple but quite good. It uses the multiplicative linear congruential 
method: 


Uji1 = fractional part of (997u;) 
where i = 0, 1, 2,... 
Up = 0.5284163* (seed) 


The period of this generator has a length of 500,000 numbers and the generator 
passes the frequency test (chi square) for uniformity, the serial test and the run 
test. The most significant digits (the left hand digits) are the most random 
digits. The right most digits are significantly less random. 


In Arithmetic Teacher the initial seed of .5284163 is stored at step 022. Label 
5 (steps 084-096) actually generates the digits for each arithmetic problem. 
However, pseudorandom number generation occupies only the first six steps of 
label 5. These six steps and the corresponding x register contents are as follows: 


STEPS X REGISTER 


LBL 5 
RCL E_ old seed 
9 
9 
| 997 
pd seed X 997 


*Other seeds may be selected but the quotient of (seed X 10°) divided by two or 
five must not be an integer. Also, it would be wise to statistically test other 
seeds before using them. 
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fractional part of (seed < 997) 
pseudorandom number is stored 
to act as seed for next loop. 











Arithmetic Teacher 





Output operation code. 






Store initial constants and 
default constants. 














Generate two values for a 
problem. 










If same problem was. just 
given, gen new problem. 






Store seed, either default or 










Input and store nmay + 1. 
Set flag to eliminate default 
value. 














Pseudorandom number 
generation. 





Calculate display setting and 
store for later access. - REARS ee cee eee ee 


Create integer no larger than 







Addition problem. 
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119 
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125 
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lz: 
128 
129 
136 
131 
132 
133 


136 


153 


159 


161 


165 


168 





Division problem. 


=m my” 


as ~ iT, ON Be Oy Pa a a in 


ms 


lf keyboard was used to 
solve problem, GTO error 


routine. 


If answer is not right, 
display problem again. 


Total problems done and 


problems wrong. 


If 20 problems have not 
been done gen. another 
problem. 


Output results of lesson 


LABELS 


Fae P| 
Fever | 
Poem S| 


FLAGS 
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Display problem again in 
case of error. Set wrong 


answer flag so that total 


will be incremented. 


Print toggle. 


TRIG 






FLAGS SET STATUS 


DISP 

















Store initial conditions. aaa a ae ae ee Se ee 


Divide height by 10000 fs BE? OGTO4 0 J HH HH 
for combined display of 
vv.0hhh Fuel-exhausted free-fall 
See eee ees oe Je : crash velocity. 




















Build vv.0hhh display taking 
negative values into 
account. 





Display velocity and 


Count down for burn. 









If all fuel has been used, 
determine crash velocity. 





Determine velocity and 
height. 
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Diagnostic Program 





Clear registers 
subroutine. 


Function test 
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